my $fh; unless (open($fh,'<:encoding(UTF-16)',$ov_file)) { ...