ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     16 Nov 2001  13:22:59
 To : "Nikolay"
 Subject : Re: Mail
 -------------------------------------------------------------------------------- 
 

 Здравствуй, Nikolay.
 
 N> Киньте плз скриптик Перловский, у кого есть такой, посылающий e-mail.
 N> Желательно использующий Sendmail.
 
 Этой фигни не держим...
 
 N> Только полностью(!) работающий.
 
 use strict;
 use MIME::Lite;
 my $msg = MIME::Lite->new(
   From => 'root@localhost',
   To => 'sam@vpi.shi',
   Subject => 'test',
   Type => 'text/plain; charset=koi8-r',
   Encoding => '8bit',
   Data => 'Тестовое письмо');
 
 $msg->send;
 
 Работает. С точностью до адреса в To:. Сделан почти дословно по хелпу
 к MIME::Lite.
 
 -- 
 Artem Chuprina
 RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
 
 P.S. Каков вопрос, таков ответ...
 
 Отправлено через сервер Talk.Ru - http://www.talk.ru
 --- ifmail v.2.15dev5
  * Origin: Talk.Ru (2:5020/400)
 
 

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