Help for this page

Select Code to Download

Select or download this

use Net::SSH::Perl::Constants qw(
              SSH_SMSG_STDERR_DATA
              SSH_CMSG_STDIN_DATA);

Select or download this

#!/usr/bin/perl

...

my ($stdout, $stderr, $exit) = $ssh->cmd($cmd1);
print $stdout, "\n";