esskar has asked for the wisdom of the Perl Monks concerning the following question:
Hi monks!
Can that be the problem?
I do not get an error but that database table does not get filled. The structure of the database table issub session_create { my ($obj, $dbh, $userid) = @_; my $mydbh = $dbh; unless($mydbh) { $mydbh = &libyn::DB::connect_to_db($obj); } $CGI::Session::MySQL::TABLE_NAME = $libyn::Config::DbTables{sessions +}; my $session = CGI::Session->new("driver:MySQL", $obj->{-cgi}, { Han +dle => $mydbh }) or die "CGI::Session->new failed."; $session->name('sessionId'); $session->expire('+1h'); $session->param('userId', $userid); unless($dbh) { $mydbh->disconnect(); } return $session; }
The doc of CGI::Session says that id has to be of type CHAR; i did create the table using CHAR in the first place and i tried changing it to CHAR later but it ain't working...CREATE TABLE yn_sessions ( id varchar(32) NOT NULL default '', a_session text NOT NULL, userId bigint(20) default NULL, UNIQUE KEY id (id) ) TYPE=MyISAM;
Can that be the problem?
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: CGI::Session and MySQL
by tilly (Archbishop) on Apr 11, 2004 at 19:55 UTC |
Back to
Seekers of Perl Wisdom