特殊文字をUTF-8に変換するには？

Question

MySQLデータベースからデータを抽出すると、いくつかの出力に特殊文字（ など）があります。 emacsは\240と\346にデコードします。 UTF-8の端末に示すとき

、特殊文字は1文字1バイトのみを使用するように�

ので、使用される符号化縫い目として示されています。

\346はæになるはずです。

質問

んPerlがUTF-8にこれらの特殊文字をエンコードすることができますモジュールを持っていますか？

Answer 1

Encode::decodeを使用して、エンコードされているデータをPerlの内部形式にデコードします。

次に、データをファイルに書き出すときは、'utf8'レイヤーを設定して、データをUTF-8で書き込むようにします。

use Encode; 

my $data_from_database = ...; 

my $perl_data = decode('ISO-8859-1', $data_from_database); 

binmode STDOUT, ':utf8'; 

print $perl_data;