Date: Thu, 31 May 2001 08:56:32 +0400
From: Alexander Kulik <Alexander.Kulik@p99.f99.n4635.z2.fidonet.org>
Newsgroups: fido7.ru.cgi.perl
Subject: отправка письма на perl
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...
1250 Прочтений • [отправка письма на perl (mail perl script)] [08.05.2012] [Комментариев: 0]
Vova
