I've been banging my head on the table with Apache::Session::MySQL today. Consider:untie throws an exception following warning causes my web page to fail:
This doesn't work from mod_perl, because theeval { ( my %session, $ok ); $ok = tie( %session, 'Apache::Session::MySQL', undef, ... ); if ( $ok ) { ... do something with %session ... } untie %session; }
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. I have since resolved it; can you see the bug?
<Reveal this spoiler or all in this thread>
Updates:- clarified failure per note from ysth. Occasionally I use an english-ish idiom instead of a precise technical term.
- The !! idiom may not be elegant to some, but I find it elegant because it can be read as "dammit," and I was looking for a -dammit flag to work around this failure :)
- The use of $ok instead of the simple if statement occurred because of some additonal logic that I was doing after the tie, and before the untie. It had been omitted in this sample code.
Back to
Meditations