$ 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;