0

我一直在阅读有关 Catalyst 框架的信息,并且试图发送一封包含 HTML 内容的电子邮件,但没有成功。

我尝试使用 Catalyst::Plugin::Email,就像这里的示例一样。电子邮件已发送,但所有内容均以纯文本形式显示。

sub send_email : Local {
    my ($self, $c) = @_;

    $c->email(
      header => [
        To      => 'me@localhost',
        Subject => 'A TT Email',
      ],
      body => $c->view('Web')->render($c, 'email.tt', {
          additional_template_paths => [ $c->config->{root} . '/email_templates'],
          email_tmpl_param1 => 'foo'
        }
      ),
    );
    # Redirect or display a message
}

我还阅读了Catalyst::View::Email::Template,但我不能安装它。

任何想法?

4

1 回答 1

0

我现在可以使用 Catalyst::Plugin::Email 发送 HTML 电子邮件。从文档:

“email() 接受与 Email::MIME::Creator 的 create() 相同的参数。”

查看 Email::MIME::Creator,创建方法结构为:

my $single = Email::MIME->create(
    header_str => [ ... ],
    body_str   => '...',
    attributes => { ... },
);

my $multi = Email::MIME->create(
    header_str => [ ... ],
    parts      => [ ... ],
    attributes => { ... },
);

“回到属性。哈希键直接对应于方法或修改来自 Email::MIME::Modifier 的消息。允许的键是:内容类型、字符集、名称、格式、边界、编码、处置和文件名。它们将是映射到“$attr_set”以进行消息修改。”

这是它正在工作的代码:

sub send_email : Local {
    my ($self, $c) = @_;

    $c->email(
      header => [
        To      => 'me@localhost',
        Subject => 'A TT Email',
      ],
      body => $c->view('Web')->render($c, 'email.tt', {
          additional_template_paths => [ $c->config->{root} . '/email_templates'],
          email_tmpl_param1 => 'foo'
        }
      ),
      attributes => {
        content_type => 'text/html',
        charset => 'utf-8'
      },
    );

    # Redirect or display a message
}
于 2013-09-05T20:04:11.417 回答