cat test.txt| perl -MEncode -npe 'Encode::from_to($_,"cp932","ISO 2022-JP")'