- or download this
# $sid = '7032f2c7f5a2c721a483dc75fc29595e';
$session = new CGI::Session("driver:MySQL", $sid, {Handle=>$dbh});
- or download this
#!/usr/bin/perl
use strict; use warnings;
...
print 'user:'.$user."\n\n";
}
- or download this
******Exist call:1
sid0:2bd4a7c8d0001e49e97dc332d6bf619e sid:2bd4a7c8d0001e49e97dc332d6bf
+619e
user:1491953482
...
******Exist call:3
********different sid0:abcd sid:2dd5bc5bc5e297150b1e4c7f58166135
user:undef-as-string