|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Artem Chuprina 2:5020/400 08 Jan 2003 13:41:32 To : Alexander Zigar' Subject : Re: Net::Smtp -------------------------------------------------------------------------------- Здравствуй, Alexander Zigar'. AZ> Пpивет All! AZ> Как послать письмо нескольким получателям? AZ> Скрипт такой: AZ> =================================== AZ> #!c:\progra~1\perl\bin\perl.exe AZ> use Net::SMTP; AZ> $smtp_host="smtp.mail.ru"; AZ> $from="Робот добавления <zigar_alex\@mail.ru>"; AZ> $to="cukerman\@mailru.com"; AZ> # ========================================= AZ> $text=" AZ> Робот сообщает: AZ> " AZ> #-- AZ> # Подключаем модуль. AZ> $smtp = Net::SMTP->new($smtp_host) || die($!); AZ> # Указываем SMTP сервер. AZ> $smtp->mail($from) or die $!; AZ> $smtp->to($to) or die $!; AZ> $smtp->data() or die $!; AZ> $smtp->datasend("To: Alex Cukerman <cukerman\@mailru.com>, AZ> $smtp-><zigar_alex\@mail.ru> \n") or die $!; AZ> #$smtp->datasend("cc: cukerman\@mailru.com \n") or die $!; AZ> # Указываем информацию для поля "Кому" AZ> $smtp->datasend("\n") or die $!; AZ> $smtp->datasend($text) or die $!; AZ> $smtp->dataend() or die $!; AZ> $smtp->quit or die $!; AZ> =================================== AZ> Если пишу несклько получателей в $to (метод smtp->to), не работает - died. AZ> Если несколько получателей в datasend('to:'), то тоже не проходит почему-то. AZ> И в 'cc' тоже не срабатывает. :( По идее должно срабатывать использование нескольких вызовов to(). Указание в RCPT TO: нескольких адресов недопустимо протоколом, а указание их в заголовке письма согласно протоколу вообще никакого значения не имеет. -- Artem Chuprina Communiware.net RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/122.256, ICQ: 13038757 --- ifmail v.2.15dev5 * Origin: Leninsky 45 home network (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/1445410562e83.html, оценка из 5, голосов 10
|