- 论坛徽章:
- 0
|
由于工作需要,需要用Net::SMTP模块来发邮件
但在发送过程中,由于使用的SMTP需要身份验证,所以用到了auth()方法
经过N次尝试,均失败
找了一个不需要验证的SMTP并去掉了auth后再试,结果成功
不知道程序有什么问题,请用过auth方法的帮忙看下,代码如下(改了一些涉及个人信息的部分)
- use Net::SMTP;
- $smtp = Net::SMTP->new('mail.test.com',Timeout=>60,Debug=>1);
- $smtp->auth('usr','passwd');
- $smtp->mail('ttt@test.com');
- $smtp->to('bbb@test.com');
- $smtp->data();
- $smtp->datasend("To:somebody");
- $smtp->datasend("\n");
- $smtp->datasend("Subject: test\n");
- $smtp->datasend("A simple test message\n");
- $smtp->dataend();
- $smtp->quit;
复制代码
[ 本帖最后由 lovepl 于 2006-11-2 14:39 编辑 ] |
|