open(FH, "<:utf8", $file) or die $!;