open FH, "<:encoding(utf16)", $filename
    or die "Couldn't open '$filename' : $!";