You probably need to binmode those filehandles you're opening. If you're on Windows and don't use binmode or specify the PerlIO modes somehow, the sequence \r\n is translated to \n on input and the reverse on output. This corrupts binary things like jpegs and zips.