open my $fh, '<:encoding(UTF-8)', $filename or die $!; #### use open IO => ':encoding(UTF-8)';