ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Alla Kibzoun                         2:5020/400     13 Sep 2000  18:29:56
 To : All
 Subject : Re: Perl + POP3
 -------------------------------------------------------------------------------- 
 

 
 
 Vladimir Shilov wrote:
 
 > 
 > Здравствуйте, All!
 > 
 > Возможен ли subj?
 > Если да - то научите получить по POP3 письма с сервера, но не все, а по
 > заданному мной фильтру.
 > Заранее спасибо.
 > 
 > До скорого, All.                                               Shilov.
 
 Mail::POP3Client
 ------------------------------------
 The sample:
   #!/usr/local/bin/perl
   
   use Mail::POP3Client;
   open (p,">mail");
 
   $pop = new Mail::POP3Client( USER     => "user",
                                PASSWORD => "passwd",
                                HOST     => "mail.com",
           PORT    => 110,
           TIMEOUT => 600);
   for ($i = 1; $i <= $pop->Count(); $i++) 
   {
   foreach($pop->Retrieve($i))
    {print p $_,"\n";}
   print p "\n";
   $pop->Delete($i);
   }
   close(p);
 --------------------------------
 Алла
 --- ifmail v.2.15dev5
  * Origin: base4 (2:5020/400)
 
 

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

Тема:    Автор:    Дата:    Perl + POP3   Vladimir Shilov   12 Sep 2000 11:45:58   Re: Perl + POP3   Denis Chernayev   13 Sep 2000 10:28:37   Re: Perl + POP3   Alla Kibzoun   13 Sep 2000 18:29:56   Perl + POP3   Greg Zemskov   13 Sep 2000 21:53:43