[perl] отослать email
use Mail::Mailer;
use strict;
my $mailer = new Mail::Mailer('sendmail');
$mailer->open({'To' => 'mail.domain', 'Subject' => "Превед!"});
print $mailer "Ололо!";
$mailer->close or die "WTF?! $!\n";
Всё пришло, кодировка та.
типа <h1>Hello</h1>
спамер, знач надо искать модуль, который контент-тайп выставляет
use Encode; # не помню, обязательно это или нет
use MIME::EncWords qw(:all);
$subject = encode_mimewords($subject, Charset => 'koi8-r', Field => "Subject: ");
Оставить комментарий
Teteshnik
use Net::SMTPнельзя отослать html
use MIME::Lite
subject может быть только латиницей
Подскажите все ли я правильно написал и какой метод лучше юзать для отсылки почты в перле, чтобы можно было отослать html и не было сюрпризов и ограничений.
есть вроде MAIL::SendMail, но его пока не юзал и ничего о нем не знаю. Показался не удобным.