■スレッドリストへ戻る■ 全部 1- 101- 201- 301- 401- 501- 601- 701- 801- 901- 1001- 最新50
【スレッド】2ch型掲示板 その5【フロート型】
- 984 :nobodyさん :02/08/03 22:42 ID:???
- ログ取りスクリプトできたぞ(ゥヲップ
ヘボコードだから966が責任持って洗練してくれ(ヲププ
#!/usr/bin/perl
use strict;
my($server,$board) = ('comic.2ch.net','anime');
system "wget -x http://$server/$board/subject.txt";
die 'openできねぇよ。シバクぞ (ワラワラ' unless open FH, "<./$server/$board/subject.txt";
/(.*)<>(.*)/, print("$2\n$1 ってヤシなこれからDLしてらるからな。\nログっつったらログ。これで$.個目のログだ。(ゥヲップ\n\n"), system("wget -xc http://$server/$board/dat/$1") while $_ = readline *FH;
187KB
新着レスの表示
スレッドリストへ戻る 全部 前100 次100 最新50
0ch BBS 2004-10-30