Perl 如何在电子邮件中打开多个同名附件，然后将附件的发件人移动到电子表格？

我有一份实习工作，最近被分配了清理邮件列表的繁琐任务。我的雇主给我发了一系列电子邮件，邮件以附件的形式回复，一次回复很多邮件，所有邮件的名字都相同。我已经考虑过最有效的方法，我希望避免像奴隶一样点击。我的想法是使用autohotkey的语言创建一个宏，但我觉得批处理文件或某种Perl也可以做同样的事情。有谁能给我一个主意，如何做到这一点，特别是批处理文件？提前谢谢

如果您不懂任何perl，那么我建议您首先将邮箱转换为某种格式，将每封电子邮件存储在单独的文本文件中，如或类似的格式

此时，您可以简单地使用命令

grep\u pattern\u124; sed-e的/：.*/'\124; sort | uniq>\u list

来获取所有匹配

\u pattern\u

的文件的列表。您可以检查/编辑此文件

\u列表

，以验证是否获得了所需的结果

然后，您可以创建另一个director

junk

或任何内容，并使用类似

perl-e'chomp的命令将
\u列表中列出的所有文件移动到
junk
；重命名（$垃圾）；”<_列表

如果您经常需要它，那么您可以进一步自动化它，很可能单独使用perl，但是一次性任务可能会涉及更多关于获取正确消息列表的麻烦

或者，您可以将所有电子邮件加载到sane邮件阅读器中的单个文件夹中，如Mac OS X的mail.app，只需执行搜索、全选、移动/删除命令。
如果您不懂任何perl，我建议您首先将邮箱转换为某种格式，将每封电子邮件存储在单独的文本文件中，如或类似文件

此时，您可以简单地使用命令
grep\u pattern\u124; sed-e的/：.*/'\124; sort | uniq>\u list
来获取所有匹配
\u pattern\u
的文件的列表。您可以检查/编辑此文件
\u列表
，以验证是否获得了所需的结果

然后，您可以创建另一个director
junk
或任何内容，并使用类似
perl-e'chomp的命令将
\u列表中列出的所有文件移动到
junk
；重命名（$垃圾）；”<_列表

如果您经常需要它，那么您可以进一步自动化它，很可能单独使用perl，但是一次性任务可能会涉及更多关于获取正确消息列表的麻烦

或者，您可以将所有电子邮件加载到sane邮件阅读器中的单个文件夹中，如Mac OS X的mail.app，只需执行搜索、全选、移动/删除命令。
解析传递报告消息中的跳转电子邮件地址。
解析传递报告消息中的跳转电子邮件地址。
可以在Perl中完成，当然，而且很快。只需查看您的输入，找到所需内容，然后将其转储到CSV文件中，导入Excel进行进一步处理。您可以发布一个输入示例，并从中删除任何可识别的信息吗？当然，可以用Perl快速完成。只需查看您的输入，找到所需内容，然后将其转储到CSV文件中，导入Excel进行进一步处理。你能发布一个输入的示例，并从中删除任何可识别的信息吗？哇，也许perl不适合我，哈哈。我感谢你的回复，但是你有没有办法给我一个好的MH程序（我没有Emac，只是在这里运行windows vista）还有，我在哪里输入你的代码？或者，你能告诉我一个适用于windows的sane邮件阅读器吗？谢谢你的回复！您还可以查看命令procmail及其配置文件procmailrc，它允许您定义规则，以mbox格式进行处理。哇，也许perl不适合我，lol。我很感谢您的回复，但您有没有办法也给我一个好的MH程序（我没有Emac，只是在这里运行windows vista），我在哪里输入您的代码？或者，你能告诉我一个适用于windows的sane邮件阅读器吗？谢谢你的回复！您还可以查看命令procmail及其配置文件procmailrc，它允许您定义规则，并以mbox格式处理它。