$ perl a.pl a_latin1.xml E9 $ perl a.pl a_utf8.xml E9