ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Alexander Zigar'                     2:5058/96      08 Jan 2003  00:10:18
 To : All
 Subject : Net::Smtp
 -------------------------------------------------------------------------------- 
 

 Пpивет All!
 
 Как послать письмо нескольким получателям?
 
 Скрипт такой:
 
 ===================================
 #!c:\progra~1\perl\bin\perl.exe
 
 use Net::SMTP;
 $smtp_host="smtp.mail.ru";
 $from="Робот добавления <zigar_alex\@mail.ru>";
 $to="cukerman\@mailru.com";
 
 # =========================================
 
 $text="
 Робот сообщает:
 "
 
 #--
 # Подключаем модуль.
 $smtp = Net::SMTP->new($smtp_host)          || die($!);
 
 # Указываем SMTP сервер.
 
 $smtp->mail($from) or die $!;
 $smtp->to($to) or die $!;
 $smtp->data() or die $!;
 $smtp->datasend("To: Alex Cukerman <cukerman\@mailru.com>, <zigar_alex\@mail.ru>
 $smtp->\n") or die $!;
 
 #$smtp->datasend("cc: cukerman\@mailru.com \n") or die $!;
 # Указываем информацию для поля "Кому"
 
 $smtp->datasend("\n") or die $!;
 $smtp->datasend($text) or die $!;
 $smtp->dataend() or die $!;
 
 $smtp->quit or die $!;
 
 ===================================
 
 Если пишу несклько получателей в $to (метод smtp->to), не работает - died. Если 
 несколько получателей в datasend('to:'), то тоже не проходит почему-то.
 
 И в 'cc' тоже не срабатывает. :(
 Пpиходите еще...
 
 Alexander
 
 ---
  * Origin: (c) 1982 Sinclair Research Ltd. (2:5058/96)
 
 

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

Тема:    Автор:    Дата:    Net::Smtp   Alexander Zigar\'   08 Jan 2003 00:10:18   Re: Net::Smtp   Artem Chuprina   08 Jan 2003 13:41:32   Net::Smtp   Alexander Zigar\'   10 Jan 2003 00:41:23   Re: Net::Smtp   Artur Penttinen   10 Jan 2003 11:33:51