ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : …ўЈҐ­Ё© Љ®а®«мЄ®ў                    2:5020/400     23 Oct 2002  19:59:56
 To : All
 Subject : nntp posting проблемы
 -------------------------------------------------------------------------------- 
 

 
 
 Здрасте всем!
  Есть следующая поблема: при попытке отправить что-нибудь в какую-нибцдь
 конференцию с использованием модуля Net::NNTP все как-будто бы нормально,
 но вот только ничего не происходит, ни ругани, ни сообщений в списке.
  Если кто поможет. будет просто замечательно!
 
 в файле message текст сообщения.
 
 Скрипт:
 use Net::NNTP;
 
 open(IN,"message");
 @ar=<IN>;
 close(IN);
 
 $news=Net::NNTP->new("news.karelia.ru");
 if($news->postok())
 {
  $news->post();
  $news->datasend("Subject: test\n");
  $news->datasend("Newsgroup: fido7.ptz.buiseness\n");
  $news->datasend("From: begemot\@sampo.ru\n");
  $news->datasend();
  foreach(@ar){
  $news->datasend($_);}
  $news->dataend();
  $news->quit();
  print "posting done\n";
 }
 else
 {
  print "posting not allowed\n";
 }
 -- 
 Евгений Корольков
 begemot@sampo.ru
 
 --- ifmail v.2.15dev5
  * Origin: UNKNOWN (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    nntp posting проблемы   …ўЈҐ­Ё© Љ®а®«мЄ®ў   23 Oct 2002 19:59:56   nntp posting проблемы   Ivan Frolcov   23 Oct 2002 22:51:46