Select Code to Download

use strict;
use warnings;
...
}

print "'$_' => '$xlate{$_}'\n" for sort keys %xlate;

'Ä' => 'ëë'
'Å' => ''
'áá' => 'è'