Perl program for Japanese character code conversion