首页 > 解决方案 > Perl - 如何将 HTML 代码文本转换为电子邮件中的 HTML 表格

问题描述

我的数组中有我的 html 代码

   @array //contains all HTML table code

我想发送一封电子邮件,通过该电子邮件发送此 html 代码并将其转换为应有的 HTML 表(不仅仅是 html 代码文本)

$to = 'my@email.com';
$from = 'my@email.com';
$subject = 'Test';
@message = @array;


open(MAIL, "|/usr/sbin/sendmail -t");

# Email Header
print MAIL "To: $to\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n\n";
print MAIL "Content-type: text/html\n";
# Email Body
print MAIL @message;

close(MAIL);
print "Email Sent Successfully\n";


}

现在这会向我发送一封电子邮件,其中包含所有 html 代码作为代码和文本行,但是我希望它像往常一样转换为 html 表。我尝试使用 MIME,但无法正常工作。帮助将不胜感激。

标签: htmlperl

解决方案


你过早地结束了标题。

您实际上拥有以下内容:

print MAIL "To: $to\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n";
print MAIL "\n";
print MAIL "Content-type: text/html\n";
print MAIL $html;

您需要以下内容:

print MAIL "To: $to\n";
print MAIL "From: $from\n";
print MAIL "Subject: $subject\n";
print MAIL "Content-type: text/html\n";
print MAIL "\n";
print MAIL $html;

推荐阅读