L
lovecreatesbea...
Hi,
I'm getting "Selected cipher type not supported by server" error on
this line
$cnn = Net::SSH:
erl->new($host);
The error occurs even when I specify all IDEA, DES, DES3, Blowfish,
arcfour, blowfish-cbc, and 3des-cbc like this:
$cnn = Net::SSH:
erl->new($host, cipher => "IDEA");
in the following script. How can I correct this?
Thank you for your time.
#!/usr/bin/perl
use Net::SSH:
erl;
my ($host, $user, $pass, $mgrip, $rpwd, $prmpt, $tmout, $line);
$host = $ARGV[0];
$user = $ARGV[1];
$pass = $ARGV[2];
$mgrip = $ARGV[3];
$rpwd = $ARGV[4];
$prmpt = '/[\$%#>] ?$/';
$tmout = 2;
$cnn = Net::SSH:
erl->new($host);
$cnn->login($user, $pass);
#$cnn->print("/bin/su -");
#$cnn->waitfor('/password: ?$/i');
#$cnn->print($rpwd);
#$cnn->prompt('/# $/');
#$cnn->waitfor($cnn->prompt);
#@line = $cnn->cmd("/usr/sbin/dasnmp -a $mgrip");
@line = $cnn->cmd("ls /");
print "@line\n";
I'm getting "Selected cipher type not supported by server" error on
this line
$cnn = Net::SSH:
The error occurs even when I specify all IDEA, DES, DES3, Blowfish,
arcfour, blowfish-cbc, and 3des-cbc like this:
$cnn = Net::SSH:
in the following script. How can I correct this?
Thank you for your time.
#!/usr/bin/perl
use Net::SSH:
my ($host, $user, $pass, $mgrip, $rpwd, $prmpt, $tmout, $line);
$host = $ARGV[0];
$user = $ARGV[1];
$pass = $ARGV[2];
$mgrip = $ARGV[3];
$rpwd = $ARGV[4];
$prmpt = '/[\$%#>] ?$/';
$tmout = 2;
$cnn = Net::SSH:
$cnn->login($user, $pass);
#$cnn->print("/bin/su -");
#$cnn->waitfor('/password: ?$/i');
#$cnn->print($rpwd);
#$cnn->prompt('/# $/');
#$cnn->waitfor($cnn->prompt);
#@line = $cnn->cmd("/usr/sbin/dasnmp -a $mgrip");
@line = $cnn->cmd("ls /");
print "@line\n";