今日はtomatoツールの巻き 3 (122ﾚｽ)
上下前次1-新
18: ◆Rock54hC3G0C (西日本) 2012/01/07(土)00:22 HOST:219.117.239.35 AAS
これか。
#過去ログメニューを書く。
my $subback = "$GB->{PATH}/subback.html";
→ my $base = "http://$ENV{SERVER_NAME}$ENV{SCRIPT_NAME}";
→ $base =~ s/[^¥/]*¥.cgi/read¥.cgi¥/$GB->{FORM}{bbs}¥//;
open(HED, '>', $subback);
flock(HED,2);
print HED<<EOF;
<html><head><meta http-equiv="Content-Type" content="text/html; charset=x-sjis"><base href="$base" target="body"></head><body><font size=2>
EOF
なんでこんなことしてるんだろ。。。
他にも呼び出している人がいるとか？
上下前次1-新書関写板覧索設栞歴
あと 104 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.002s