Hi monks!

sub 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;
}
[download]

I do not get an error but that database table does not get filled. The structure of the database table is

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;
[download]

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...
Can that be the problem?

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.