perlでjisメールの文字化け
通常Webでメール送信をしようとすると、sendmailコマンドを実行してjisでメールを送信すると思います。
その時に問題になるのが、環境依存文字などによる文字化けです。
「①」や「㈱」や「-」等が文字化けの対象となります。
解決法
「Unicode::Japanese」のモジュールを使用します。
これはサーバーにインストールしないと使用ができません。
でも、これを使用すればjisのメールでも文字化けすることなくメールが送れるようになります。(検証はしてないけど・・・)
使用例
my $MailBody = "メールの中身を記述して下さいよ。";
#jisに変換
my $tmpMailBody = Unicode::Japanese->new($MailBody)->jis;
後は変換したのをsenndmailコマンドで飛ばす。
簡単な説明だけど、こんな感じです。