in reply to Re^2: binmode(STDIN) (testing)
in thread binmode(STDIN)
Hmmm, This was the original test I did:
[19:50:37.28] P:\test>perl -ple"INIT{binmode(*ARGV,':raw');$/=\64}" -e +"$_=join $\,join' ',unpack'(A8)*',unpack'H*',$_" 2.log 313a2063 6f6d3a31 3a203e20 6c6f6766 696c653a 322e6c6f 670a0d0a 313a206 +3 6f6d3a31 3a203e20 6c6f6766 696c653a 322e6c6f 670a0d0a 313a2063 6f6d +3a31 3a203e20 6c6f6766 696c653a 322e6c6f 670a0d0a 313a2063 6f6d3a31 3a203e2 +0 6c6f6766 696c653a 322e6c6f 670a0d0a 313a2063 6f6d3a31 3a203e20 6c6f +6766 696c653a 322e6c6f 670a0d0a 313a2063 6f6d3a31 3a203e20 6c6f6766 696c653 +a 322e6c6f 670a0d0a 313a2063 6f6d3a31 3a203e20 6c6f6766 696c653a 322e +6c6f 670a0d0a [ 3:00:14.96] P:\test>
Which certainly does have (several) of the 0d0a sequences.
But looking more closely, it's actually '0a0d0a' which my eye's did not discern, I should have used a larger font.
I admit it. I saw what I wanted to see, and then faffed around with getting the formatting right.
Sorry.
|
|---|