使用MIME :: Parser拆分电子邮件

Question

我将4GB的电子邮件串联到一个文件中，并提出了MIME :: Parser可以再次将单个电子邮件拆分出去的建议。 我迄今为止所做的所有尝试都以语法分析器结束，而该语法分析器仅复制原始文件而不提取任何电子邮件。 所以：这甚至是MIME :: Parser可以处理的东西吗？ 我的代码很基本：

my $file = IO::File->new("somefile", O_RDONLY);
my $parser = new MIME::Parser;
$parser->output_dir("somedir");
my $entity = $parser->parse($file);
$file->close;

以下是一些人要求的样品日期的链接。 这是所有垃圾邮件和网络钓鱼电子邮件。 请勿点击任何链接。 享受： 4KB电子邮件的Pastbin。

Answer 1

MIME :: Parser用于读取单个邮件以获取附件等。它可用于提取附加在另一邮件内的邮件，作为message/rfc822 ，但并非旨在从具有大量内容的某种存档中提取邮件串联的邮件。

目前尚不清楚您的单个文件带有哪种格式。 但是，如果它来自UNIX系统或Thunderbird安装，则可能只是采用传统的Mbox格式，并且有几种工具可以将Mbox文件拆分为单独的消息。 除了几个perl模块外，还有其他工具，例如git-mailsplit ，可帮助您从Mbox格式提取邮件。