■掲示板に戻る■ 全部 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 最新50
名前: E-mail (省略可) :

read.cgi ver5.26+ (01/10/21-)