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;