use Encode qw(encode decode);

$outname = encode 'cp1252', "accentué.txt";
open $outfile, $outname
   or die "\nIncapable d'ouvrir '$outname' en lecture\n";
$contenu = <$outfile>;
close $outfile;

print STDOUT encode 'cp1252', "\nContenu = $contenu\n";