ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Peter Levchenko                      2:463/672      06 Jun 2003  11:25:22
 To : All
 Subject : smtp
 -------------------------------------------------------------------------------- 
 

 
     Hарод, подскажите как пройти аутентификацию. Скрипт (см.ниже) не отсылает
 письмо т.к. сервер (см. $smtp_host) требует AUTH, а как это сделать?
     Что-то типа Net:SMTP->passwd("password") или
                 Net:SMTP->auth("user","password")
     я не нашел.
 
     Подскажите, плиз.
 
 === Begin s2.pl ===
 #!/usr/bin/perl -w
 
 use Net::SMTP;
 
 $smtp_host="online.com.ua";
 $from="user1\@online.com.ua";
 $to="user1\@yahoo.com";
 
 $text="Hello, this is test\n";
 
 $smtp = Net::SMTP->new($smtp_host, Debug => 1);
 print $smtp->domain,"\n";
 
 $smtp->mail($from);
 $smtp->to($to);
 
 $smtp->data();
 $smtp->datasend("To: $to\n");
 $smtp->datasend("\n");
 $smtp->datasend($text);
 $smtp->dataend();
 
 $smtp->quit;
 
 === End s2.pl ===
 
 С наилучшими пожеланиями, Петр H. Левченко, AKA 2:463/672
                                             idc2814@yahoo.com
                                             ICQ:302506383
 --- <New Station BBS, _4569142_, _CM_>, GoldED+/BSD 1.1.4.7
  * Origin: Как лихо ты обходишься без бабы! (2:463/672)
 
 

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

Тема:    Автор:    Дата:    smtp   Peter Levchenko   06 Jun 2003 11:25:22   Re: smtp   Artem Chuprina   07 Jun 2003 16:23:24   Re^2: smtp   Peter Levchenko   13 Jun 2003 09:01:06