open F, ">$file" or die "Could not write $file Perl says reason $!\n";
binmode F;   # may be important does no harm it not needed