Select Code to Download

$ perl -Mutf8 -wE 'say "e-acute: é; u-acute: ú"'
e-acute: ?; u-acute: ?

$ perl -Mutf8 -wE 'binmode STDOUT => ":utf8"; say "e-acute: é; u-acute
+: ú"'
e-acute: é; u-acute: ú

$ perl -Mutf8 -wE 'use open OUT => qw{:utf8 :std}; say "e-acute: é; u-
+acute: ú"'
e-acute: é; u-acute: ú

open my $fh, '>:encoding(UTF-8)', $filename

use autodie;
...
open my $in_fh, '<', $infile;
open my $out_fh, '>', $outfile;