CGI::Session で Set-Cookieのexpiresを設定する方法
my $cgi = new CGI; CGI::Session->name("SESSION_ID"); my $session = new CGI::Session(undef,$cgi,{Directory=>'/tmp'}); print $session->header( -cookie => $session->cookie(-expires => '+30d'), -expires=> '-1', -charset=> $charset, );