Senden Sie eine E-Mail Perl mit MIME :: Lite

Question

Ich versuche nur eine einfache E-Mail mit Perl und MIME :: Lite zu senden und erhalte den folgenden Fehler: SMTP Mail() Befehl fehlgeschlagen: 5.1.7 Ungültige Adderess Hier ist mein Code:

#!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"); 

Danke.

landete ich es zu lösen up:

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

Sie müssen pass to send() the smtp arguments denke ich.