open(my $fh, "<:utf8", $fn);