什么是用于创建和发送电子邮件的良好Perl OO界面？

Question

我正在寻找一种简单的(OO？)方法来创建和发送电子邮件.

就像是

$e = Email->new(to => "test <test@test.com>", from => "from <from@from.com>");
$e->plain_text($plain_version);
$e->html($html_version);
$e->attach_file($some_file_object);

我发现Email :: MIME :: CreateHTML几乎在所有方面看起来都很棒,但它似乎不支持文件附件.

此外,我正在考虑将这些电子邮件写入数据库并让cronjob在以后发送它们.这意味着我需要一个$e->as_text()sub来返回整个电子邮件,包括附件,作为原始文本,我可以填入数据库.因此,我需要一种发送原始电子邮件的方式 - 实现这一目标的好方法是什么？

非常感谢

Answer 1

您必须更仔细地阅读文档，那么您的三个问题中的两个将毫无意义。

从概要Email::MIME::CreateHTML：

my $email = Email::MIME->create_html(

显然你得到了一个Email::MIME对象。请参阅方法parts_set和parts_set以获取所谓的附件。

Email::MIME是 的子类Email::Simple。请参阅方法as_string将对象序列化为文本。

请参阅Email::Sender以发送邮件。