七行プログラミング (452ﾚｽ)
上
下
前
次
1-
新
42
(1)
:
◆FruitsMIpE
02/11/03 18:27 ID:???
AA×
[240|
320
|
480
|
600
|
100%
|
JPG
|
べ
|
ﾚｽ栞
|
ﾚｽ消
]
42: ◆FruitsMIpE [sage] 02/11/03 18:27 ID:??? 改良 $q=$ENV{QUERY_STRING}; if($q){@p=split /[&;]/,$q; foreach(@p){($a,$b)=split "="; $b=~tr/+/ /; $b=~s/%([A-Za-z0-9]{2})/pack("C", hex($1))/eg; $i{$a}=$b;} open W, ">> b.log"; print W "$i{n}：$i{m}\n"; close W;} print "Content-type: text/html\n\n<html>\n<title>BBS</title>\n\n"; open R, "b.log"; while(<R>) {chomp; print "$_<br>\n";} close R; print qq{<hr>\n<form>Name<input type="text" name="n"> <input type="text" name="m" size="64"> <input type="submit"> [<a href="b.cgi">Reload</a>] [<a href="../../">Back</a>]</form>\n<hr>\n</html>\n}; http://medaka.5ch.net/test/read.cgi/php/1036141603/42
改良
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 410 ﾚｽあります
ｽﾚ情報
赤ﾚｽ抽出
画像ﾚｽ抽出
歴の未読ｽﾚ
ぬこの手
ぬこTOP
0.021s
