Displaying 1 result from an estimated 1 matches for "sshprotocol".
2006 Nov 02
1
Using perl-Net-SSH-Perl with pubkey authentication under CGI.
...print "Content-type: text/html\n\n";
print "<HEAD><TITLE>Quick Test</TITLE></HEAD>";
$ENV{HOME} = "/var/www";
$ENV{USER} = "apache";
use Net::SSH::Perl;
$sshhost='target';
$sshuser='cgissh';
$sshport='22';
$sshprotocol='2';
$sshdebug='1';
$sshcipher='3des-cbc';
$sshconn = Net::SSH::Perl->new($sshhost, protocol=>$sshprotocol,
port=>$sshport, debug=>$sshdebug, cipher=>$sshcipher);
$sshconn->login($sshuser);
my($out,$err) = $sshconn->cmd('hostname');
print "...