2

当我们使用“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;。但是当点击Show Original时我在 gmail 中找到的 Return-Path是Return-Path : from_email_id.

其实我想要它作为Return-Path : $default_email.

4

1 回答 1

2

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

从Mail::Sendmail 的文档中：

如果您希望使用不同于 From: 地址的信封发件人地址，$mail{Sender}请在您的%mail哈希中设置

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

于 2013-10-12T12:59:09.680 回答