Help for this page

Select Code to Download


  1. or download this
    my @encoded_hira = <INP>;
my @decoded_hira = map { decode('UTF-8', $_) } @encoded_hira;
my @decoded_romaji = kana2romaji(@decoded_hira);
my @encoded_romaji = map { encode('UTF-8', $_) } @decoded_romaji;
print OUTP @encoded_romaji;
  2. or download this
    binmode INP, ':encoding(UTF-8)';
binmode OUTP, ':encoding(UTF-8)';
  3. or download this
    open(INP,  '<:encoding(UTF-8)', $ARGV[0])
open(OUTP, '>:encoding(UTF-8)', $ARGV[1])