Cookieの賞味期限を設定するためには、

Wdy, DD-Mon-YYYY HH:MM:SS GMT

のような形式の日付を指定する必要がありますが、「x
日後」という指定ができません。そこで、「x日後」に
期限が切れるCookieを作成するために、私は普段下のよ
うな関数を使っています。

$max_date = &get_expire(0.5);

とすると半日後の日付が取得できます。

sub get_expire{
        local($days_later) = shift;
        ($sec,$min,$hour,$mday,$mon,$year,$wday)
                           = gmtime(time + int($days_later*60*60*24));
        $mon = ("Jan","Feb","Mar","Apr","May","Jun"
               ,"Jul","Aug","Sep","Oct","Nov","Dec")[$mon];
        $wday = ("Sun","Mon","Tue","Wed","Thu","Fri","Sat")[$wday];
        sprintf("$wday, %2.2d-$mon-%4.4d %2.2d:%2.2d:%2.2d GMT"
                ,$mday,$year+1900,$hour,$min,$sec);
}