open my $fh, '>:encoding(UTF-8)', $filename or die "Couldn't open '$filename': $!";