当我们使用“Mail :: Sendmail”模块发送邮件时,如何在邮件中设置“Return-Path”?
我想从我自己的服务器发送一封电子邮件,其地址为email_id@gmail.com
至sender_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
。
答案 0 :(得分:2)
来自the documentation for Mail::Sendmail:
如果您希望使用与发件人:地址不同的信封发件人地址,请在
中设置$mail{Sender}
哈希
大多数邮件服务器(MTA)将信封发件人复制到Return-Path:
标题。