ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Slava Gorbanev                       2:5057/19.20   16 Jun 2002  05:15:30
 To : Rostislav Podgornyi
 Subject : срочно нужна помощь по net::pop3
 -------------------------------------------------------------------------------- 
 

 
 Sunday June 16 2002 00:35, Rostislav Podgornyi writes:
 
  RP> Я последовательно подключаюсь к pазным pop3 сеpвеpам (список
  RP> сеpвеpов с логинами и паpолями беpу из файла и пpоганяю по циклу)
  RP> и пpовеpяю там почту.
 
  RP> foreach $user (@users) {
  RP>     @user_params = split(/\|x\|/,$user);
 
  RP>     $pop = Net::POP3->new("$user_params[4]", Timeout => 60);
 
 next unless defined $pop;
 
  RP>     $user = $pop->user("$user_params[5]");
  RP>     $pass = $pop->pass("$user_params[6]");
 
 -- 
 rnd, hardcore necromancer: склепики, гробики, саркофагики...
 
 --- GoldED+/W32 snapshot-2001.5.29
  * Origin: FTS-0004 compliant system (2:5057/19.20)
 
 

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

Тема:    Автор:    Дата:    срочно нужна помощь по net::pop3   Rostislav Podgornyi   16 Jun 2002 00:35:28   Re: срочно нужна помощь по net::pop3   Dmitry Koteroff   16 Jun 2002 04:23:15   срочно нужна помощь по net::pop3   Slava Gorbanev   16 Jun 2002 05:15:30   срочно нужна помощь по net::pop3   Rostislav Podgornyi   16 Jun 2002 10:15:16