我使用Net::SMTP::SSL
在Perl中发送电子邮件,并收到“454错误:身份验证失败”
这是我的代码:
use Net::SMTP::SSL;
$smtp = Net::SMTP::SSL->new($smtp2, Port => $smtp_port2, Timeout => 10, Debug => 1);
$smtp->auth($login2, $password2);
$smtp->mail($login2);
$smtp->to($to);
$smtp->data();
$smtp->datasend("To: $to\n");
$smtp->datasend("From: Aspiring error email \n");
$smtp->datasend("Date: $today\n");
$smtp->datasend("Subject: $subject\n");
$smtp->datasend("\n");
$smtp->datasend($message);
$smtp->dataend();
$smtp->quit;
我收到了这些消息:
Net::SMTP::SSL=GLOB(0xf9ab80)<<< 454 Error: authentication failed, system busy
似乎我没有认证,我确信用户名和pw是正确的。 非常感谢!!!
答案 0 :(得分:1)
454错误:身份验证失败,系统忙
这些都是暂时性问题。 邮件服务器可能没有对密码进行本地验证,但使用的是外部系统(如Radius或LDAP服务器),并且与此身份验证系统的连接失败。稍后再试一次,希望问题得到解决。
如果凭据错误,服务器将发送535状态代码。 另请参阅RFC4954中的状态代码。