这篇文章将为大家详细讲解有关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='hello world
'; 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格式的邮件”这篇文章就分享到这里了，希望以上内容可以对大家有一定的帮助，使各位可以学到更多知识，如果觉得文章不错，请把它分享出去让更多的人看到。
另外有需要云服务器可以了解下创新互联cdcxhl.cn，海内外云服务器15元起步，三天无理由+7*72小时售后在线，公司持有idc许可证，提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案，具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势，专为企业上云打造定制，能够满足用户丰富、多元化的应用场景需求。
