Help for this page
$ perl -le'use open ":std", ":locale"; $_="\xE0 la plage"; utf8::downg +rade($_); print "\u$_"' à la plage $ perl -le'use open ":std", ":locale"; $_="\xE0 la plage"; utf8::upgra +de($_); print "\u$_"' À la plage
open(my $fh, '<:encoding(UTF-8)', $qfn) or die("Can't open file $qfn: $!\n");