open my $fh, '<:encoding(UTF-8)', $file or die $!;