CGI::Session Ver4.xx

困った。

ローカル環境のCGI::SessionをVer4.xxにしたら、いろいろと変わっていて、そのままではエラーを出すようになった。
MySQLでテーブルの名前を変更して使っていた(不細工だが、直接モジュールをロードして変数を変更していた)のだが、そのモジュールの名前と場所が変わったのだ。

実際にはよりスマートにテーブル名を変更できるようになったのだが…。

—- 3.xx —-

1
2
3
4
use CGI::Session qw(-ip_match);
use CGI::Session::MySQL;
$CGI::Session::MySQL::TABLE_NAME = $tablename;
my $session = CGI::Session->new("dr:MySQL", $cgi, {Handle => $dbh});

—- 4.xx —-

1
2
use CGI::Session qw(-ip_match);
my $session = CGI::Session->new("dr:mysql", $cgi, {Handle => $dbh, TableName => $tablename});

CGI::Sessionのバージョンを見て処理を分けないといけないんだろうなぁ…。

comments powered by Disqus
Hugo で構築されています。
テーマ StackJimmy によって設計されています。