Select Code to Download

#!/usr/bin/perl
use strict;
...
}
print $fh $euro_in_unicode, "\n";
close $fh;

Close with partial character at am85.pl line 18.
Close with partial character.