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