perlにおけるセッションIDについて
sessionIDがページを更新するたびに変わってしまいます。
その結果、前回セッションに保存した値を読み込めません。
my $cgi = new CGI;
CGI::Session->name("SESSION_ID");
my $session = new CGI::Session("driver:File", $cgi, {Directory=>'./session'});
print $session->header(-charset=>'UTF-8');
print $session->id();
print $session->param("name"); #表示されず。
というようにしてセッションIDを表示すると、毎回変化します。
どうしたらIDを変わらないように出来るでしょうか？
ちなみに、セッションに書き込むのは、
my $cgi = new CGI;
CGI::Session->name("SESSION_ID");
my $session = new CGI::Session("driver:File", $cgi, {Directory=>'./session'});
$session->header(-charset=>'UTF-8');
$session->param("name", "abc");
$session->flush();
undef($session);
こんな処理をしてます。
