open my $handle, '<:encoding(UTF-16LE)', $filename
   or die "Can't open file '$filename' for reading: $!";