久々に CGI なプログラムを書こうとしたら、すっかり忘れていたので。 まずは cookie を設定する場合。 #!/usr/bin/perl use strict; use warnings; use CGI; my $q = new CGI; # cookie を作成 my $cookie = $q->cookie(-name => "hoge", # cookie名 -value => "fuga", # 値 -expires => "+30d" # 有効期限 ); # cookie を HTTPヘッダにセットして発行 print $q->header(-type => 'text/html', -charset => 'UTF-8', -cookie => $cookie ); # 以下略・・・ 有効期限については、整数と時間の単位の組み合わせで指定します。使える時間の単位は、s(