[Perl] MIME::Entityでヘッダを直接設定する場合のメモ

つうか、生きておりますが、色々と忙しくて帰宅した際にブログ書いてらんないのですよ。
そのうち時間ができたら、新築の話をUPしていきますが、とりあえずは、Perlのメモ。



$ent = MIME::Entity->build(
'Message-ID:' => $msgid,
..いろいろ..
);

my $h = $ent->head;
$h->fold;
${$h->{mail_hdr_hash}->{To}->[0]} = "To: $to";
${$h->{mail_hdr_hash}->{CC}->[0]} = "Cc: $cc"; # Ccに代入すると、folding時の行末のスペースが削除される
${$h->{mail_hdr_hash}->{BCC}->[0]} = "Bcc: $bcc";# Bccも同様
$h->{mail_hdr_modify} = 0;


まあ、MIME::Entityという古臭いモジュールでメールを作成してるんですが、直接ヘッダを突っ込む場合は上のようなことをしてます。
で、問題は、Ccにいれちゃったり、Bccにいれるとなぜか行末のスペースが消えたりする。。

かなりはまりました。

ブログ気持玉

クリックして気持ちを伝えよう!

ログインしてクリックすれば、自分のブログへのリンクが付きます。

→ログインへ

なるほど(納得、参考になった、ヘー)
驚いた
面白い
ナイス
ガッツ(がんばれ!)
かわいい

気持玉数 : 0

この記事へのコメント

この記事へのトラックバック