|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Alexander Kulik 2:4635/99.99 31 May 2001 09:56:32
To : Roman Onufryk
Subject : Sendmail
--------------------------------------------------------------------------------
Как-то Roman Onufryk писАл(а) к All:
RO> Может кто пpивести мне пpимеp отпpавки письма e-mail. Со всеми нюансами?
Кстати Mail::Sendmail неплохой (работает непосредственно через порт),
работает на любой платформе, главное что-бы perl5 был, эта библиотека и любой
адрес smtp-сервера.
#!/usr/bin/perl
use Mail::Sendmail;
%mail = ( To => 'Комy@надо.послать',
From => 'От@кого.письмо',
Message => "Это собственно тело письма!!",
SMTP => 'smtp.mail.ru'
);
sendmail(%mail) or die $Mail::Sendmail::error;
print "OK. Log says:\n", $Mail::Sendmail::log;
Be c00l! It's wolf...
--- GoldED+/386 1.0.0
* Origin: Вот это по-нашенски! http://wolf.appua.com (2:4635/99.99)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
