I have a header with the string:$header01 = "52494646F8110000514C434D666D74209600000001008D0A";But to write in a file I need to write this string as a binary, than I use the following command:my( $hex ) = pack( 'H*', $header01);Than, the problem begins here, all the time that the pack command convert the string and find an "0A", by yourself insert a "0D" before.Do you know how to took out the "0D" that perl insert by yourself?
Try this:
open( FO, ">foo.out");
binmode FO;
print FO $hex;
close FO;
--
pDale Campbell
_______________________________________________ ActivePerl mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
