use utf8; my $á = 42; print $á, "\n"; __END__ 42