Tobias Hoellrich wrote:
>
> I wanted to trap non-existant session-id's by bracketing the
>
> tie %{$href}, 'Apache::Session::DBI', $id,
> {
> DataSource => 'dbi:mysql:sessions',
> UserName => 'db_user',
> Password => 'db_passwd'
> };
>
> with an eval { }; block. Once I've done this and send a non-existant
> session-id I get the following in my error_log:
>
> panic: POPSTACK
> Callback called exit.
This is a bug in Perl.
> Without the eval around the tie the script dies with:
>
> [Tue Oct 19 16:55:09 1999] [error] Object does not exist in the data
> store at /usr/local2/lib/perl5/si
> te_perl/5.005/Apache/Session/DBIStore.pm line 192.
>
> So, do I have to look check the database myself for the session-id? Should
> I modify DBIStore.pm to not die, but do something else?
>
> Is this related to:
> http://x31.deja.com/getdoc.xp?AN=536753692&CONTEXT=940379169.1854472193&hitn
> um=1
Yes. Perhaps you should try upgrading to a newer Perl. You could also
modify DBIStore to not die(), but you will have to come up with some
other exception reporting mechanism.
Reagrds,
Jeffrey
> Cheers
> Tobias
--
Jeffrey W. Baker * [EMAIL PROTECTED]
Critical Path, Inc. * we handle the world's email * www.cp.net
415.808.8807