如何让邮件主题支持中文?

如何让邮件主题支持中文?

如何让邮件主题支持中文?
如题,当前的代码,如果邮件主题用中文,就会报错.

. . . . . .
sendmail( From => $FORM{'Sender'},
To => $FORM{'Email'},
Subject => $FORM{'Subject'},
'Content_type' => "text/plain; charset=utf-8",
File => \*STREAM) || die $ABC::Mail::LAST_ERROR;
. . . . . .

谢谢!!!
试试 To => "$FO.
试试 To => "$FORM{'Email'}"
有时候简写不是什么好东西
[quote]--use Encode;<b.
楼主可以先试试楼上 jackycheng 的方法,不行的话如下:

[quote]
use Encode;

......

$FORM{'Subject'} = encode('MIME-Header',decode('[color=red]gb2312[/color]',$FORM{'Subject'}));

......
[/quote]

这会把中文的标题用 UTF8 编码,然后再用 BASE64 编码,再处理成 MIME-Header 的字符串,试试
注意看代码中红色部分,我假设你的中文标题是 gb2312,如果你的中文标题是 utf8,请自行改成 utf8




   

如果要是只解决运行期错误.
如果要是只解决运行期错误的问题,unicode用不上吧?不用unicode不会发生错误,顶多是乱码而已。

对于编码,我的一个愚见是,直接use utf8的话,就不用转了吧?sendmail里面已经指定字符集为utf-8了。
感谢 jackycheng 和 cnhac.
感谢 jackycheng 和 cnhacktnt !

初步测试了, To => "$FORM{'Email'}" 在我这里报错了.

下面的代码也报错, 说encode没有定义。
encode('MIME-Header',decode('gb2312',$FORM{'Subject'}));

谢谢!

[CCB]1[/CCB]
use Encode;.
use Encode;
谢谢jeffrey2----今天.
谢谢jeffrey2

今天测试了一下,公司的perl环境不支持 Encode - 没有安装 Encde.pm .... 公司服务器在美国....

放弃了,不管怎样,能得到各位强人支持,实在荣幸![CCB]1[/CCB]
btw..
今天重新测试了一下:
To => "$FORM{'Email'}"

得到的错误和下面的一样:
To => $FORM{'Email'}

就是说,不简写对中文识别没有什么帮助。

谢谢支持!
简不简写都失败就是没帮助.
简不简写都失败就是没帮助?
那么我跟你都是男生也就什么都一样了?

用这个测试吧。不是我说。

P.s Code标签居然不能用。厄。。。。。。

$FORM{'Email'}="中文";
sendmail( From => $FORM{'Sender'},
To => "$FORM{'Email'}",
Subject => $FORM{'Subject'},
'Content_type' => "text/plain; charset=utf-8",
File => \*STREAM) || die $ABC::Mail::LAST_ERROR);#运行正常

sendmail( From => $FORM{'Sender'},
To => $FORM{'Email'},
Subject => $FORM{'Subject'},
'Content_type' => "text/plain; charset=utf-8",
File => \*STREAM) || die $ABC::Mail::LAST_ERROR);#运行失败

sub sendmail {

}