如何使用perl为原始回复电子邮件生成文本文件
我想为原始回复电子邮件自动生成一个文本文件,例如,如下所示:如何使用perl为原始回复电子邮件生成文本文件,perl,email,Perl,Email,我想为原始回复电子邮件自动生成一个文本文件,例如,如下所示: Subject: hello Mime-Version: 1.0 (Mac OS X Mail 6.6 \(1510\)) Content-Type: text/html; charset=us-ascii X-Apple-Base-Url: x-msg://5/ X-Universally-Unique-Identifier: f3193934-f4df-4b36-95ab-36f3171570b8 X-Apple-Mail
Subject: hello
Mime-Version: 1.0 (Mac OS X Mail 6.6 \(1510\))
Content-Type: text/html;
charset=us-ascii
X-Apple-Base-Url: x-msg://5/
X-Universally-Unique-Identifier: f3193934-f4df-4b36-95ab-36f3171570b8
X-Apple-Mail-Remote-Attachments: YES
From: Some Person <usera@mydomain.com>
X-Apple-Windows-Friendly: 1
Date: Mon, 24 Feb 2014 14:43:11 -0800
X-Apple-Mail-Signature: SKIP_SIGNATURE
Content-Transfer-Encoding: 7bit
Message-Id: <41FFDBF3-D482-45A4-A11F-CA545621B513@mydomain.com>
X-Smtp-Server: mymachine
X-Uniform-Type-Identifier: com.apple.mail-draft
To: userb@mydomain.com
<html><head></head><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "></body></html>
主题:你好
Mime版本:1.0(Mac OS X Mail 6.6\(1510\)
内容类型:text/html;
字符集=美国ascii码
X-Apple-Base-Url:X-msg://5/
X-通用唯一标识符:f3193934-f4df-4b36-95ab-36f3171570b8
X-Apple-Mail-Remote-Attachments:是
发信人:某个人
X-Apple-Windows友好型:1
日期:2014年2月24日星期一14:43:11-0800
X-Apple-Mail-Signature:跳过签名
内容传输编码:7bit
消息Id:
X-Smtp-Server:mymachine
X-Uniform-Type-Identifier:com.apple.mail-draft
致:userb@mydomain.com
这是通过首先回复收到的电子邮件获得的,然后在sent
框中,我可以看到show original source
有没有办法将此电子邮件自动生成为文本文件,或打印到标准输出?对于SMTP/Exchnage服务器分配的神秘值,不应由客户端程序生成
您可以这样生成电子邮件:我不清楚您的意思。你能不能把它用引号括起来,并在前面加上
print
?我的意思是说用文本生成整个电子邮件,例如,如何获取X-universal-Unique-Identifier
或消息Id