Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re: Perl Variables Being Retained

by tobyink (Abbot)
on Aug 01, 2013 at 23:18 UTC ( #1047513=note: print w/replies, xml ) Need Help??

in reply to Perl Variables Being Retained

I think it's likely that you do not have IIS configured to run via CGI, but instead have it configured to run via FastCGI or some other persistent mechanism.

That's generally considered a good thing. It means that your Perl script can save doing a bunch of initialization stuff for every single request (loading modules, connecting to databases, etc) and instead do it just once. This could allow you to process many more requests per second.

However, it does mean that you've got to be careful not to persist stuff you don't want to persist. Generally making sure that variables are lexically scoped (i.e. my $var) should be sufficient to take care of that. The other thing you'll need to be careful about is leaking memory. This can happen if you have cyclical references pointing to each other, e.g.:

my $a = []; my $b = []; push @$a, $b; push @$b, $a;

... these two arrays now each contain a reference to each other, so Perl doesn't ever realise it can free that memory, and doesn't free it until the end of the process. If every web request creates these two arrays, then the process ends up eating a little more memory for each request.

But anyway, although you need to be a little more careful than you do with CGI, generally speaking a persistent Perl interpreter is a good way of serving web content.

package Cow { use Moo; has name => (is => 'lazy', default => sub { 'Mooington' }) } say Cow->new->name

Replies are listed 'Best First'.
Re^2: Perl Variables Being Retained
by sundialsvc4 (Abbot) on Aug 02, 2013 at 12:25 UTC

    Specifically in terms of “Perl not cleaning up the memory,” also note the weaken in Scalar::Util.   If you have data structures referring to one-another such that a circular reference is formed, memory does not clean up but rather “leaks.”   You avoid this by weakening one of the links in the chain.   Test::Memory::Cycle is another tool that is designed specifically to look for these circular reference-chains.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1047513]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (6)
As of 2018-06-19 13:48 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (114 votes). Check out past polls.