Beefy Boxes and Bandwidth Generously Provided by pair Networks Frank
laziness, impatience, and hubris
 
PerlMonks  

papidave's scratchpad

by papidave (Monk)
on Oct 03, 2007 at 19:53 UTC ( #642489=scratchpad: print w/ replies, xml ) Need Help??
Public ScratchpadDownload, Select Code To D/L
I've been banging my head on the table with Apache::Session::MySQL today. Consider:

eval {
   ( my %session, $ok );
   $ok = tie( %session, 'Apache::Session::MySQL', undef, ... );
   if ( $ok )
   {
      ... do something with %session ...
   }
   untie %session;
}

[download]
This doesn't work from mod_perl, because the untie throws an exception:
untie attempted while 1 inner references still exist at foo.pl line 250.
Since I don't use any explicit references to %session, this caught me by surprise. Can you see the bug?

<Reveal this spoiler or all in this thread>
Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others taking refuge in the Monastery: (10)
As of 2013-06-20 06:27 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How many continents have you visited?









    Results (680 votes), past polls