Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

papidave's scratchpad

by papidave (Pilgrim)
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
Domain Nodelet?

www.com | www.net | www.org
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (2)
As of 2023-09-25 19:15 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found
    Notices?