Select Code to Download

#!/usr/bin/perl
use strict;
...
$ssh->login($user,$password);
my($out) = $ssh->cmd($cmd);
print "$out\n";

#!/usr/bin/perl
#this uses Net::SSH, instead of Net::SSH::Perl 
...
print "$out\n";
print "$error\n";