Отправка почты через Perl

Question

Я использую приведенный ниже код для отправки электронного письма

#!/usr/bin/perl

sub BEGIN {
        unshift (@INC,'/opt/dev/common/mds/perlLib');
}

use Mail::Sender;

$sender = new Mail::Sender
{smtp => 'xxx.xxx.x.xx', from => 'abc@xyz.xom'};
$sender->MailFile({to => 'abc@xyz.xom',
subject => 'Here is the file',
msg => "I'm sending you the list you wanted."});

$sender->Close;

Но это не отправка почты вообще. Что не так в моем коде?

Answer 1

Я не использую этот модуль, потому что MIME :: Entity работает намного лучше, но работая с почтой, я могу сказать, что вы опережаете себя и делаете предположения, а не вычеты.

perldoc в этом модуле показывает несколько методов - и MailFile для прикрепления и отправки файлов.Если произойдет сбой при отправке сообщения без вложенного файла, я должен сказать, что не удивлен.Это сработало где-то еще?

Удалось ли вам заставить MailMsg () работать?Если вы не можете (синтаксис очень похож, но с меньшим количеством ошибок), у вас может быть проблема с подключением к серверу.С бита xxx.xxx.xxx.xxx, я должен предположить, что вы используете IP-адрес.Попробуйте имя хоста.Кроме того, установите on_errors для die () или, возможно, warn (), и посмотрите, сможете ли вы перехватить ошибку.Большинство почтовых попыток терпят неудачу во время подключения к серверу / создания объекта - тогда попытка отправки будет по определению неудачной, но часто без объяснения причин.не требуется аутентификация на вашем сервере.