Отправить письмо Perl, используя MIME :: Lite

Question

Я просто пытаюсь отправить базовое электронное письмо, используя Perl и MIME :: Lite, и получаю следующую ошибку: Ошибка команды SMTP mail (): 5.1.7 Неверный адрес Вот мой код:

#!perl

use MIME::Lite;

#Create Mail
$msg = MIME::Lite->new(
From =>'someone@someplace.com',
To =>'someone@someplace.com',
Cc =>'some@other.com',
Subject =>'Subject Test',
Data =>"Data Test"
);

#Send Mail
$msg->send( "smtp", "mail.place.com" );

Спасибо.

Я решил:

sub EMailReport
{
    use MIME::Lite;

    my $theSubject = "Sub";

    my $theData = "Data";

    my $theEmail = MIME::Lite->new(
    From     =>'From@someplace.somewhere.com',
    To       =>'fistname.lastname@company.com',
    Subject  =>$theSubject,
    Data     =>$theData
    );

    $theEmail->add( "Type" => "multipart/mixed" );

    $theEmail->send( "smtp", "somemail.company.com" );
}

Answer 1

Вам необходимо передать send () аргументы SMTP Я думаю.