Select Code to Download

use utf8;
my $€ = 1;
print $€;

Malformed UTF-8 character (unexpected end of string) at utf8test.pl li
+ne 3.
Unrecognized character \x82 in column 5 at utf8test.pl line 3.

use utf8;
my $á = 1;
print $á;

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