★ bbs.cgi軽量化開発コンペ ★

>>363
ちょっとした最適化を。。。
クッキーの部分。
expireはgmtimeから返るスカラーを使えば(･∀･)イイ！だけなので
#有効期限をつくる
my $exp = 24 * 60 * 60;
$exp *= 30; #有功日数を乗じる
my $expire_Str=gmtime(time + $exp);
my $cname = "$FORM{'FROM'}";
my $cmail = "$FORM{'mail'}";
if($ENV{'HTTP_USER_AGENT'} =~ /mac/i){
$cname =~ s/(\W)/'%' . unpack('H2', $1)/eg;
$cmail =~ s/(\W)/'%' . unpack('H2', $1)/eg;
}
print "Set-Cookie: NAME=$cname; expires=$expire_Str GMT; path=/\n";
print "Set-Cookie: MAIL=$cmail; expires=$expire_Str GMT; path=/\n";
てできるとおもわれ。

>>376
はうあ。名前抜けた。376は洩れです

あ、弐編だ。