Help for this page

Select Code to Download

Select or download this

binmode STDOUT, ":utf8";

...
my $kanji_utf8 = decode( $kanji_enc, $kanji );

printf( "English: %s  Kana: %s  Kanji: %s\n", $eng, $kana_utf8, $kanji
+_utf8 );

Select or download this
```
English: Ah!  Kana: ?  Kanji: NA
```