这篇文章将为大家详细讲解有关Perl如何通过SMTP发送正文为HTML格式的邮件,小编觉得挺实用的,因此分享给大家做个参考,希望大家阅读完这篇文章后可以有所收获。
Perl虽然有Net::SMTP模块可以发送邮件,但是似乎只能发送纯文本的邮件,这次的需求是将一个HTML网页直接显示在邮件正文中,因此搜索到了MIME::Lite模块来实现这个功能。
use strict; use MIME::Lite; my $mailhost="smtp.163.com"; my $username="test\@163.com"; my $password="test"; my $data=' <!DOCTYPE html> <html> <head> <meta charset="UTF-8"> <title> title </title> </head> <body> <p>hello world</p> </body> </html> '; my $msg=MIME::Lite->new( From=>"$username", To=>"$username", Subject=>"title", Type=>"text/html", Data=>"$data" ); $msg->send('smtp',$mailhost,AuthUser=>$username,AuthPass=>$password);
关于“Perl如何通过SMTP发送正文为HTML格式的邮件”这篇文章就分享到这里了,希望以上内容可以对大家有一定的帮助,使各位可以学到更多知识,如果觉得文章不错,请把它分享出去让更多的人看到。
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。