文字コードを変換する Perl ワンライナー

• Shift_JIS から EUC-JP に変換する。

perl -i.org -MEncode -pe 'Encode::from_to($_,"shiftjis","euc-jp");' hoge.txt

• 改行コードも CRLF から LF に変換する場合。

perl -i.org -MEncode -pe 's/\r\n/\n/g;Encode::from_to($_,"shiftjis","euc-jp");' hoge.txt