Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: mod_perl memory question

by Rhandom (Curate)
on Mar 05, 2008 at 15:46 UTC ( #672199=note: print w/ replies, xml ) Need Help??


in reply to mod_perl memory question

If the cache needs to be shared among children - I second the vote for memcache.

If each child needs its own, I'd do something like the following using the End module:

# add clear_cache method to your sharedcache package sharedcache; sub clear_cache { $cache = undef } # inside your apache handler use the following: use End; sub handler { my $clear_cache = end { sharedcache::clear_cache() }; # normal handler operations go here }


When your handler goes out of scope - the object stored in $clear_cache will go out of scope and the stored coderef will fire - clearing your cache.

my @a=qw(random brilliant braindead); print $a[rand(@a)];


Comment on Re: mod_perl memory question
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://672199]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others rifling through the Monastery: (13)
As of 2014-09-02 15:09 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite cookbook is:










    Results (25 votes), past polls