Re: [PERL] Wierd perl error

[Peter Makholm <sslug@sslug>]

"Peter Lindstrøm" <sslug@sslug> writes:

> Use of uninitialized value in join or string at
>         /usr/lib/perl5/site_perl/5.6.0/i386-linux/DBI.pm line 387 during
> global destruction (#1)

[...]

>         DBI::connect('DBI', undef, undef, undef, 'HASH(0x8472ef0)') called
> at /usr/lib/perl5/site_perl/5.6.1/CGI/Session/MySQL.pm line 131

Ok, der er to oplysninger. Der er noget der ikke er initialiseret (læs
undefined) og problemet er CGI::Session::MySQL

> my $Sessiondbh = Plit::Mysql::OpenDB('PlitSessions','YY','XX');
> my $Admindbh = Plit::Mysql::OpenDB('AdminGangWar','YY','XX');

[...]

> my $sid = $cgi->cookie('PLITGANGWARSID') || undef;
> my $session = new CGI::Session::MySQL($sid, {
>                    Handle     => $Sessiondbh,
>                   })
>                   or die $CGI::Session::errstr;

Dette er det eneste sted hvor du giver data til
CGI::Session::MySQL. Har du tjekket at $Sessiondbh er defineret?

Prøv at tjekke resultatet af Plit::Mysql::OpenDB i ovenstående to
linjer.

-- 
SSLUGs julekalender - hver dag fra den 1. til den 24. december
   http://www.sslug.dk/julekalender/