+ -
当前位置:首页 → 问答吧 → 用Net::SMTP_auth发邮件,邮件内容问题,急!

用Net::SMTP_auth发邮件,邮件内容问题,急!

时间:2010-11-30

来源:互联网

小弟用Net::SMTP_auth写了一个发送邮件的脚本:
内容如下:
  1. #!/usr/bin/perl
  2. use Net::SMTP_auth;
  3. if(@ARGV < 3) { die "Usage: ./$0 mailbox centent subject\n\n";}
  4. $mail_server='smtp.abc.cn';
  5. $mail_from='[email protected]';
  6. $smtp=Net::SMTP->new("$mail_server",Debug=>1);
  7. $smtp->auth('[email protected]','123456');
  8. $smtp->mail($mail_from);
  9. $smtp->to("$ARGV[0]");
  10. $smtp->data();
  11. $smtp->datasend("from:$mail_from\n");
  12. $smtp->datasend("to:$ARGV[0]\n");
  13. $smtp->datasend("subject:$ARGV[2]\n");
  14. $smtp->datasend("content-type:text/html;charset=utf-8\n\n");
  15. $smtp->datasend("$ARGV[1]\n");
  16. $smtp->dataend();
  17. $smtp->quit;
复制代码
主要的问题是,发送的内容是$ARGV[1],其中内容包括:

"请点击此链接:<a>http://www.test.com</a>"
可是邮箱收到的内容只是普通的文本,并没有在内容中有http://www.test.com这个链接。是不是“content-type:text/html;charset=utf-8\n\n”有问题,请大侠们帮忙!!!

作者: li_000828   发布时间: 2010-11-30

问题已经解决了,符号问题。

作者: li_000828   发布时间: 2010-11-30

热门下载

更多