Электронная почта не отправляется с perl MIME:: Lite с использованием smtp

Я пытаюсь отправить электронное письмо с помощью MIME::Lite, но электронное письмо не отправляется, и я не получаю никаких ошибок. Код:

    my $subject = $Config->{email}->{subject};
    my $from_email = $Config->{email}->{from_email};
    my $message = $Config->{email}->{message};
    my $smtp_server = $Config->{email}->{smtp_server};
    my $msg = MIME::Lite->new
    (
    Subject => $subject,
    From    => $from_email,
    To      => $email,
    Type    => 'text/html',
    Data    => $message
    );

    $msg->send('smtp' ,$smtp_server );

person James    schedule 10.12.2010    source источник
comment
Sendmail установлен? Если да, попробуйте отправить почту с его помощью.   -  person Alexandr Ciornii    schedule 11.12.2010
comment
Email::Sender имеет проверку на наличие ошибок, а MIME::Lite — нет. - Вы можете установить Wireshark, чтобы увидеть доклад SMTProtocol.   -  person daxim    schedule 11.12.2010


Ответы (1)


Там особо нечего делать...

Может попробовать отладить?

$msg->send( 'smtp', $smtp_server,  Debug=>1 );

И убедитесь, что все значения в $Config->{email} соответствуют вашим ожиданиям.

person martin clayton    schedule 10.12.2010
comment
Я попробовал отладку, но ничего нового. все значения правильные. Я работаю на виртуальной машине, если это проблема. Мое соединение NAT и может подключаться к Интернету. - person James; 10.12.2010