当我们使用“Mail :: Sendmail”模块发送邮件时,如何在邮件中设置“Return-Path”?

时间:2013-10-12 12:33:29

标签: perl email sendmail perl-module

当我们使用“Mail :: Sendmail”模块发送邮件时,如何在邮件中设置“Return-Path”?

我想从我自己的服务器发送一封电子邮件,其地址为email_id@gmail.comsender_to@gmail.com。例如,它应该是www.example.com

我想将该电子邮件的Return-path添加为example@example.com。我尝试了很多,但未能正确设置。

代码如下:

#!/usr/bin/perl -w
use CGI;
use Mail::Sendmail;

%mail = (
    To => $email,
    From=>  $user_email,
    subject=> $subject,
    'X-Mailer'=> "example.com Campaign Sharing Software",
);
$default_email                  = qq{example@example.com};
$mail{'Reply-To'}               = $user_email;
$mail{'content-type'}           = "text/html"; 
$mail{Smtp}                     = $GLOB{settings}{SMTPSERVER_BULK};
$mail{'Message : '}             = $mail_content;
if(sendmail  %mail)
{
       print qq{mail sent successfully};
}

我已设置$mail{'Return-Path'} = $default_email;。但是,点击显示原始时,我在Gmail中找到的返回路径为 Return-Path : from_email_id

实际上我希望它为 Return-Path : $default_email

1 个答案:

答案 0 :(得分:2)

Mail :: Sendmail - 设置信封发件人

来自the documentation for Mail::Sendmail

  

如果您希望使用与发件人:地址不同的信封发件人地址,请在$mail{Sender}哈希

中设置%mail

大多数邮件服务器(MTA)将信封发件人复制到Return-Path:标题。