Help for this page
use utf8; binmode(STDOUT, ":utf8"); ... print "\n"; __OUTPUT__ azsc
open(my $fh, "<:encoding(UTF-8)", "filename") || die "can't open UTF-8 encoded filename: $!";