Отправляем письмо через удаленный smtp ( например smtp.yandex.ru ) на perl


#!/usr/bin/perl

use strict;
use warnings;

use Mail::Sender;

my $sender = new Mail::Sender {
headers => 'Content-Type: text/plain; charset=utf-8',
smtp => 'smtp.yandex.ru',
from => 'email@email.ru',
to => "email2@email.ru",
subject => 'Hello, i am subject',
# debug => 'debug.log',
msg => "Hello, i am message",
auth => 'PLAIN',
authid => 'email@email.ru',
authpwd => 'password_from_email_email_ru',
};
my $result = $sender->MailMsg({
msg => $sender->{msg},
});
}

subject и msg понимают кириллицу и перенос строк на 100%

Tags: , ,

Leave a Reply