Re: Manipulating Binary files

Perhaps I'm missing something, but all the answers thus far seem terribly overcomplicated:

{
    local $/ = "\x0D\x0A";
    binmode INPUT;
    binmode OUTPUT;
    while (<INPUT>) {
      print OUTPUT if $. > 1;
    }
}
[download]

   MeowChow                                   
               s aamecha.s a..a\u$&owag.print

Comment on Re: Manipulating Binary files Download Code

Replies are listed 'Best First'.
(tye)Re3: Manipulating Binary files by tye (Sage) on May 14, 2001 at 22:09 UTC
If the binary file is very large and the "\x0d\x0a" comes late in the file, then `<INPUT>` is going to read most of the file into memory, which may fail due to the above considerations. - tye (but my friends call me "Tye")	[reply] [d/l]
Re: (tye)Re3: Manipulating Binary files by MeowChow (Vicar) on May 14, 2001 at 22:15 UTC
I would guess that the `0D-OA` sequence appears with regularity in the file, considering that it's the binary record seperator for DOS/Win32 systems, equivalent to "\n" in the *nix world. MeowChow s aamecha.s a..a\u$&owag.print	[reply]