markdownを使ってHTMLメールを送信
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);