Perl更改电子邮件主题

Perl更改电子邮件主题

问题描述:

我是新来的Perl,我需要从Exchange读取一封电子邮件并使用Perl为主题添加一个ID。Perl更改电子邮件主题

我在寻找,我找到了:

邮件::互联网分裂的消息到邮件::头类的标题对象,再加上身体。您可以通过此对象获取并设置单独的标题:

my $subject = $obj->head->get("Subject"); 
$obj->head->replace("Subject", "New subject"); 

但是我简直无法理解如何使脚本更改主题。

任何人都可以帮忙吗?

由于提前,

+0

之后,您就$ obj->头戴式>更换(...)发生在您的信函::标题对象?即在调用 - >替换之前和之后,转出其内容(使用Data :: Dumper)。你有没有注意到一个区别? – xxfelixxx

这个工作对我来说:

my $header = $entity->head; 
my $subject = $entity->head->get('subject'); 
$header->replace('Subject', "Some new subject");