メール送信の 7bit-jis だと機種依存文字文字化けする対策

perl 文字コード

Encode::EUCMSJP

を使う。
標準モジュールじゃないし、pmだけじゃないからインストール必要。

  • CP50220は、半角カナを全角カナに変換しつつ他の文字もマッピング
  • CP50221は、半角カナも他の文字もうまいことマッピング

via http://d.hatena.ne.jp/shidho/20080415/p1

use Encode::EUCJPMS;
use Encode;
my $cp50220_str = Encode::from_to( $utf8_str , "UTF8" , "CP50220" );