in reply to Re^2: Net::OpenSSH quoting problems
in thread Net::OpenSSH quoting problems

If you look at Re^3: Net::OpenSSH quoting problems, you see that Laurent_R uses p for looking at $object. This is what makes the difference.

x "dumps" the value so that it could be eval'ed back, p simply outputs it. See perldebug

Replies are listed 'Best First'.
Re^4: Net::OpenSSH quoting problems
by jhuijsing (Acolyte) on May 13, 2014 at 21:33 UTC
    Ok so when I use p to look the variable it look correct But, it still not right when I look at the debug from NET::OPENssh The string being sent still has the double \\ and the appliance reject this and I get an error
[reply]
      Set $Net::OpenSSH::debug = -1 in order to see what is the module actually sending to the remote host.
[reply]
[d/l]
        $item =~ s/( \d+-\d+)/\\$1/g;

$cmd = "blah blah fred blat $item blah blah blah";

$logger->info("Request data for $item");

 ( $output, $errput ) = $ssh->capture2( $cmd )
       or $logger->logdie( "Export failed: " . $ssh->error );

$logger->debug("\n$output");

        [download]
        Debug output 
        # call args: ['ssh','-S','/home/testuser/.libnet-openssh-perl/user-10.
+10.10.10-10528-606627','-l','user','-p','2024','10.10.10.10','--','bl
+ah blah fred blat ITEM\\ 0-17\\ 0-19 blah blah blah']
# open_ex: ['ssh','-S','/home/testuser/.libnet-openssh-perl/user-10.10
+.10.10-10528-606627','-l','user','-p','2024','10.10.10.10','--','blah
+ blah fred blat ITEM\\ 0-17\\ 0-19 blah blah blah']
# io3 mloop, cin: 0, cout: 1, cerr: 1
# io3 fast, cin: 0, cout: 1, cerr: 1
# stdout, bytes read: 728 at offset 0
#> 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2
+d 5e 0d 0a 73 79 6e 74 61 78 | -----------------------^..syntax

        [download]
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom