open FIL, $_ or die "could not open $_: $!\n";
binmode FIL, ":encoding(UTF-16)";