¢£ WebProg ‰SŽÒ‚ ..
[
2ch
|
¥Menu
]
¡ƒRƒsƒyƒ‚[ƒh
ƒXƒŒ‚ð’Êí•\ަ
ƒIƒvƒVƒ‡ƒ“ƒ‚[ƒh
‚±‚̽گÄÞ‚ÌURL
¡€–ÚƒeƒLƒXƒg
94:nobody‚³‚ñ 06/07/16 17:50:40 #!usr/local/bin/perl use CGI;$q = CGI->new;$q->param;die($q->cgi_error) if ($q->cgi_error); print "Location:http://pc8.2ch.net/test/read.cgi/hp/",$q->param('num'),"/l50\n\n" if ($q->param('hair') eq 'hage'); print <<HTML; Content-type: text/html ‚ðAlink.cgi‚Æ‚©‚ŃAƒbƒv‚µ‚ÄA <form method="POST" script="$ENV{'SCRIPT_NAME'}"><input type="hidden" name="hair" value="hage"> <input type="text" name="num"><input type="submit" value="‚Ê‚é‚Û"></form> ‚ðjump.html‚ȂǂŃAƒbƒv‚·‚ê‚΂¢‚¢‚̂ł·‚©H 95:nobody‚³‚ñ 06/07/16 17:54:14 >>94 ‚¿‚ª‚¤B 96:nobody‚³‚ñ 06/07/16 17:56:28 ‚¦IH‚¶‚á‚ #!usr/local/bin/perl use CGI;$q = CGI->new;$q->param;die($q->cgi_error) if ($q->cgi_error); print "Location:http://pc8.2ch.net/test/read.cgi/hp/",$q->param('num'),"/l50\n\n" if ($q->param('hair') eq 'hage'); print <<HTML; Content-type: text/html <form method="POST" script="$ENV{'SCRIPT_NAME'}"><input type="hidden" name="hair" value="hage"> <input type="text" name="num"><input type="submit" value="‚Ê‚é‚Û"></form> HTML ‚±‚ê‘S•”CGI‚Å‚·‚©H
ŽŸƒy[ƒW
ÅVƒŒƒX•\ަ
ƒXƒŒƒbƒh‚ÌŒŸõ
—ÞŽ—ƒXƒŒˆê——
˜b‘è‚̃jƒ…[ƒX
‚¨‚Ü‚©‚¹ƒŠƒXƒg
¥ƒIƒvƒVƒ‡ƒ“‚ð•\ަ
ƒŒƒXƒWƒƒƒ“ƒv
mixiƒ`ƒFƒbƒNI
Twitter‚É“Še
ƒIƒvƒVƒ‡ƒ“
‚µ‚¨‚è‚ð‹²‚Þ
ƒXƒŒƒbƒh‚É‘ž
ƒXƒŒƒbƒh‚̈ꗗ
‰É‚‚Ԃµ2ch
5345“ú‘O‚ÉXV/239 KB
’S“–:undef