Mail::Sender发送的邮件正文中文乱码

小公猫

我用Mail::Sender发送的邮件，标题的中文是正常的，可是正文的中文总是乱码，求解。
Windows xp，ActivePerl5.16

1. my $sender = new Mail::Sender {
   
2.         smtp => 'smtp.sina.com.cn',
   
3.      from => ,
   
4.      auth => 'LOGIN',
   
5.      authid => 'yourname',
   
6.      authpwd => ******,
   
7.      on_errors => undef,
   
8. } or die "Can't create the Mail::Sender object: $Mail::Sender::Error\n";
   
9. $sender->MailFile({to =>'other@domain.com',
   
10.        subject => '标题',
    
11.        msg => "这里是正文",
    
12.        file => 'd:\perl\me.txt'}) or print $Mail::Sender::Error;Sender::Error;
    
13. $sender ->Close();

复制代码

climby

中文部分需要用utf8  encoding 一下