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

Question

当我们使用“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 。

Answer 1

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

来自the documentation for Mail::Sendmail：

  

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

中设置%mail

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