■掲示板に戻る■ 全部 1- 101- 201- 301- 401- 501- 601- 701- 801- 901- 最新50
レス数が950を超えています。1000を超えると表示できなくなるよ。 |
くだらない質問はここに書き込め!Ver.なんでもアリ
- 431 :名無しさん@XEmacs :2001/06/05(火) 01:23
- 漏れは、こんな perl script を使ってるよ。
use News::NNTPClient;
my @Groups = ("japan.binaries.pictures.erotica",
"foo.bar.hoge",
);
my $news = new News::NNTPClient ("news.hogehoge.jp");
for (@Groups){
my ($first, $last) = $news -> group($_);
while($first<$last){
print $news->article($first);
$first++;
}
}
これの出力を、file に落して、uudeview にかけてる。
新着レスの表示
掲示板に戻る 全部 前100 次100 最新50read.cgi ver5.26+ (01/10/21-)