#!/usr/bin/perl # # use strict; use warnings; use Text::Kakasi; my $k = Text::Kakasi->new('-JJ','-c','-w','-i utf8','-o utf8'); my $jpn = $k->get("–‚–@"); print "$jpn\n"; #### Wide character in print at ./kakasi.pl line 12. –‚–@