open my $fh, '<:raw:perlio:encoding(UTF-16LE)', $filename
    or die "Couldn't read '$filename': $! / $^E";