open my $fh, ">", "output.txt" or die $!;
print $fh encode('latin-1', $euro_in_unicode), "\n";
close $fh;