読者です 読者をやめる 読者になる 読者になる

weblog of key_amb

主にIT関連の技術メモ

markdownを使ってHTMLメールを送信

Perl Markdown

markdownはプレーンテキストをHTMLに変換するツールである。

CPANだとText::Markdownというモジュールがあるので、これを使ってHTMLメールを送るには、以下のようにすればできるだろう。

use Email::MIME;
use Email::Sender::Simple 'sendmail';
use Text::Markdown 'markdown';

my $html = markdown($text);

my $email = Email::MIME->create(
    header => [
        From    => $from,
        To      => join(',', @to),
        Subject => $subject,
    ],
    attributes => {
        content_type => 'text/html',
        charset      => 'ISO-2022-JP',
        encoding     => '7bit',
    },
    body => $html,
);

sendmail($email);