|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Pafnuty E. Kolov 2:5020/400 05 Jun 2005 23:58:33 To : All Subject : Net::NNTP -- использование модуля -------------------------------------------------------------------------------- Здравствуйте! Вопрос у меня очень общий, поэтому устроит и ответ в виде перечня ссылок на ресурсы сети :) В Perl Cookbook от Tom Christiansen и Nathan Torkington есть пример: Use the CPAN module Net::NNTP: use Net::NNTP; $server = Net::NNTP->new("news.host.dom") or die "Can't connect to news server: $@\n"; ($narticles, $first, $last, $name) = $server->group( "misc.test" ) or die "Can't select misc.test\n"; $headers = $server->head($first) or die "Can't get headers from article $first in $name\n"; $bodytext = $server->body($first) or die "Can't get body from article $first in $name\n"; $article = $server->article($first) or die "Can't get article $first from $name\n"; $server->postok() or warn "Server didn't tell me I could post.\n"; $server->post( [ @lines ] ) or die "Can't post: $!\n"; Меня интересуют такие вопросы: * Что делать, если news-сервер требует авторизации ? * Hе могли бы Вы привести код, который бы отправлял статью на сервер? Hапример, fido7.ru.news только и держится на постах роботов. Хочу тоже наладить постинг сообщений в кое-какие конференции (конечно, по согласованию с модераторским составом, не думайте ничего плохого). -- С уважением, П.Е. Колов <culture@kulichki.com>. "Hовости Культуры": http://culture.kulichki.com/ 2005-06-05 Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru --- ifmail v.2.15dev5.3 * Origin: Talk.Mail.Ru (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/6509494b9ee1.html, оценка из 5, голосов 10
|