クッキーの有効期限の記述について

質問

クッキーを扱う時に書く、expires（有効期限）の
記載についてですが・・
最初に曜日を書かなければなりませんが、
この場合、曜日を調べるのが、結構面倒です。
かといって、1年後とかの曜日を、プログラムから
計算するのも、面倒だと思います。
例えば、適当な曜日をセットしたりすると、どうなるのでしょうか。
また、有効期限の設定について、楽な方法、おすすめ
な書き方はないでしょうか。お願いします。

回答No.3

hikomin

CGIモジュールを使えば良いですが、クッキーの為だけに使うのはもったいないので、直接作成するサンプルです。

sub returnCookieDate
{
my $expire = shift | 0; # 期間を取得
my $time = time + $expire; # 期限を設定
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = gmtime ($time);
my $week = ('Sun','Mon','Tue','Wed','Thu','Fri','Sat') [$wday];
my $monw = ('Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep','Oct','Nov','Dec')[$mon];
return sprintf("%s, %02d-%s-%04d %02d:%02d:%02d GMT",$week,$mday,$monw,$year+1900,$hour,$min,$sec);
}

こんな関数を書いておいて、

my $expire = 1 * 365 * 24 * 60 * 60; # １年間の秒数
$expire = returnCookieDate($expire);

とかやります。（私の場合ですが。）

お礼

回答ありがとうございます。
モジュールを使わないなら、やっぱり配列を
使うしかないようですね。
ちなみに、先に書きましたが、IEでは、曜日の
設定は無視されているみたいです。