*99の指定したCGIを*00が作るスレ (327ﾚｽ)
上下前次1-新

---

307: perlお勉強中 03/07/12 15:28 ID:FW3/pTdg(1/2) AAS
>>99ネタ#1

#/usr/local/bin/perl
use Socket;
use FileHandle;

$list_url = '外部ﾘﾝｸ:www.ff.iij4u.or.jp
&get_list;
srand(time|$$);
$url = $list[rand(@list)];
if ($ENV{'PERLXS'} eq "PerlIS") {
　　　　print "HTTP/1.0 302 Temporary Redirection\r\n";
省4

---

上下前次1-新書関写板覧索設栞歴

---

あと 20 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.004s