So if you got the display working, why do you now want to strip the diacritics?

Anyway, Text::Unidecode. And while I'm at it, here's the boilerplate code for getting Perl reasonably UTF-8:

use utf8;                  # upgrades your strings
my $city = "Sprîngfíèld";
binmode(STDOUT, ":encoding(utf-8)");
print $city, "\n";


# use decode_utf8() when reading from e.g. a file
# alternatively, see the binmode() call above
use Encode 'decode_utf8';
my $input_raw = <STDIN>;
my $input = decode_utf8($input_raw);
print $input, "\n";
[download]