- or download this
use Net::SSH::W32Perl;
my $ssh = Net::SSH::W32Perl->new($host,use_pty => 0,);
...
my $Command="ls -lrt";
my($stdout, $stderr, $exit) = $ssh->cmd($Command);
print "$stdout";
- or download this
sub ConnectSSH {
...
return($ClearCaseSSHObjectRef);
}
- or download this
indamaaaf31786: Reading configuration data /.ssh/config
indamaaaf31786: Reading configuration data /etc/ssh_config
indamaaaf31786: Connecting to host, port 22.
...
E:/perl/site/lib/Net/SSH/Perl/Kex/DH1.pm line 13 Net::SSH::Perl::Kex::
+BEGIN at
E:/perl/site/lib/Net/SSH/Perl/Kex.pm line 6 Net::SSH::Perl::SSH2::BEGI
+N at
E:/perl/site/lib/Net/SSH/Perl/SSH2.pm line 6