*99の指定したCGIを*00が作るスレ (327レス)
上
下
前
次
1-
新
307
:
perlお勉強中
03/07/12 15:28
ID:FW3/pTdg(1/2)
AA×
>>99
外部リンク:www.ff.iij4u.or.jp
[240|
320
|
480
|
600
|
100%
|
JPG
|
べ
|
レス栞
|
レス消
]
307: perlお勉強中 [] 03/07/12 15:28 ID:FW3/pTdg >>99ネタ#1 #/usr/local/bin/perl use Socket; use FileHandle; $list_url = 'http://www.ff.iij4u.or.jp/~ch2/bbsmenu.html'; &get_list; srand(time|$$); $url = $list[rand(@list)]; if ($ENV{'PERLXS'} eq "PerlIS") { print "HTTP/1.0 302 Temporary Redirection\r\n"; print "Content-type: text/html\n"; } print "Location: $url\n\n"; exit; http://medaka.5ch.net/test/read.cgi/php/1037501017/307
ネタ
上
下
前
次
1-
新
書
関
写
板
覧
索
設
栞
歴
あと 20 レスあります
スレ情報
赤レス抽出
画像レス抽出
歴の未読スレ
AAサムネイル
ぬこの手
ぬこTOP
0.014s