为了发送诸如行政专业人员日®之类的活动的愿望,我尝试通过所有邮件提供商向我的用户发送邮件,并且接收者正在正确获取电子邮件主题,但 AOL 邮件提供商除外我们在这里看到的特殊字符(注册符号)没有得到很好的渲染。我正在使用 perl。部分代码如下。
my $email_subject = _decode_html_entities($q->param('email_subject'));
my $email_msg = MIME::Lite->new(
From => '$frm',
To => $email_to,
Subject => '=?utf-8?B?'.encode_base64($email_subject).'?=',
Type => 'text/plain',
Encoding => 'base64',
Data => $email_body
);
$email_msg->attr("content-type.charset" => 'UTF8');
$email_msg->add( 'X-Card-Nos' => $uc );
$email_msg->add( 'X-Type' => 'Test_YearAfter_Reminder' );
$email_msg->add( 'Errors-To' => $error_mail_rec );
sub _decode_html_entities {
my $str = shift;
$str =~ s/%([a-f0-9]{2})/chr(hex($1))/egi;
return encode_utf8($str);
}
其他电子邮件提供商将邮件主题显示为
行政专业人员日®电子贺卡
而 aol 邮件主题显示主题行为
=?utf-8?B?QWRtaW5pc3RyYXRpdmUgUHJvZmVzc2lvbmFscyBEYXnCriBlY2FyZHM= ?=