On Windows, I think, you must set binmode() on any filehandle that will write out binary data. Google or "perldoc -f binmode" for more info.