文字コードで悩みました

CPANモジュールのXML::UserAgentで取得したモノの文字コードがEUC-JPで、自分の作成したプログラムが吐き出す文字コードがUTF8で、どちらかに文字コードを合わせると文字化けが発生していて、今日半日ぐらい悩んで、やっと解決しました。

方法は下記に。

use Encode;

#外部サイトから取得したモノが入っている
$get;

#元々指定されていた文字コードeuc-jpから、utf8に文字コードを変換する
my $henKan = Encode::decode('euc-jp', $get);

perlのバージョンは、5.8を使っているから、文字コードの扱いは簡単なのかなっと思っています。