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

---

233(1): 02/12/31 10:34 ID:2j4SuGi0(1/2) AA×


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
233: [] 02/12/31 10:34 ID:2j4SuGi0 100ではないが99のはこんなんで良いのか？ URL取得部分が激甘なのでmailtoとか他のサイトの部分まで拾って痛いが（藁 #!/usr/local/bin/perl -w use Socket; $boardList = "board_list.dat"; if(!(-e $boardList)) { $method = "GET"; $host = "www.ff.iij4u.or.jp"; $path = "~ch2/bbsmenu.html"; $port = getservbyname('http', 'tcp'); $iaddr = inet_aton($host) || die "$connect_hostは存在しないホストです。\n"; $sock_addr = pack_sockaddr_in($port, $iaddr); socket(SOCKET, PF_INET, SOCK_STREAM, 0) || die "ソケットを生成できません。\n"; connect(SOCKET, $sock_addr) || die "$connect_host の ポート$portに接続できません。\n"; select(SOCKET); $|=1; select(STDOUT); print SOCKET "$method /$path HTTP/1.0\r\n"; print SOCKET "User-Agent: 2ch roulette/0.0 \r\n"; print SOCKET "\r\n"; http://medaka.5ch.io/test/read.cgi/php/1037501017/233
ではないがのはこんなんで良いのか？ 取得部分が激甘なのでとか他のサイトの部分まで拾って痛いが藁 は存在しないホストです ソケットを生成できません の ポートに接続できません

---

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

---

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

---

ぬこの手 ぬこTOP 0.324s*