in reply to unpack() removing data

the problem appears to be in the 
 
 $data = qx{sg_logs --page=0x34,1 pd1 -H -r };

[download]
line where the 0x0D byte which is part of the sg_logs result is getting stripped when sent to $data with the '=' operator is there a way to ensure the result from the qx{} is sent to $data as binary data without any interference? something like binmode but for '=' instead of for file handles?

Replies are listed 'Best First'.
Re^2: unpack() removing data
by BrowserUk (Patriarch) on Jan 11, 2013 at 20:14 UTC

    Instead of using qx//, use a piped open whereby you can binmode the handle before importing the data:

    open PIPE, '-|', 'sg_logs --page=0x34,1 pd1 -H -r' or die $!;
binmode PIPE;
my $data = do{ local $/; <PIPE> };
close PIPE;

    [download]
    With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'
    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.
[reply]
[d/l]
      thank you! this is exactly what I needed. looks to be working correctly now.

      thanks again

[reply]

In Section Seekers of Perl Wisdom