Net::SSH::Perl 在 /usr/share/perl5/vendor_perl/Net/SSH/Perl/SSH2.pm 第 92 行抛出错误 No kex algorithm
Net::SSH::Perl throws error No kex algorithm at /usr/share/perl5/vendor_perl/Net/SSH/Perl/SSH2.pm line 92
我正在使用 Net::SSH::Perl 连接到 Qlogic 交换机。当它因以下错误而失败时：
No kex algorithm at /usr/share/perl5/vendor_perl/Net/SSH/Perl/SSH2.pm
line 92
代码：
use Net::SSH::Perl;
$ssh = Net::SSH::Perl->new("$switch_name", protocol=>'2,1',debug=>1);
$ssh->login("USER","$pw");
($stdout,$stderr,$exit) = $ssh->cmd("$cmd");
调试输出：
myserver: Reading configuration data /export/home/ibmi1984/.ssh/config
myserver: Reading configuration data /etc/ssh_config
myserver: Connecting to HFDB12PF26A, port 22.
myserver: Remote protocol version 2.0, remote software version OpenSSH_6.7
myserver: Net::SSH::Perl Version 1.34, protocol version 2.0.
.yserver: No compat match: OpenSSH_6.7
myserver: Connection established.
myserver: Sent key-exchange init (KEXINIT), wait response.
No kex algorithm at /usr/share/perl5/vendor_perl/Net/SSH/Perl/SSH2.pm line 92
有人可以帮我解决这个问题吗？相同的代码适用于其他设备，只是这个设备有问题。
谢谢，
加里
已通过将 Net::SSH::Perl 升级到 v1.41 解决此问题
感谢@daxim
的提示
我正在使用 Net::SSH::Perl 连接到 Qlogic 交换机。当它因以下错误而失败时：
No kex algorithm at /usr/share/perl5/vendor_perl/Net/SSH/Perl/SSH2.pm line 92
代码：
use Net::SSH::Perl;
$ssh = Net::SSH::Perl->new("$switch_name", protocol=>'2,1',debug=>1);
$ssh->login("USER","$pw");
($stdout,$stderr,$exit) = $ssh->cmd("$cmd");
调试输出：
myserver: Reading configuration data /export/home/ibmi1984/.ssh/config
myserver: Reading configuration data /etc/ssh_config
myserver: Connecting to HFDB12PF26A, port 22.
myserver: Remote protocol version 2.0, remote software version OpenSSH_6.7
myserver: Net::SSH::Perl Version 1.34, protocol version 2.0.
.yserver: No compat match: OpenSSH_6.7
myserver: Connection established.
myserver: Sent key-exchange init (KEXINIT), wait response.
No kex algorithm at /usr/share/perl5/vendor_perl/Net/SSH/Perl/SSH2.pm line 92
有人可以帮我解决这个问题吗？相同的代码适用于其他设备，只是这个设备有问题。
谢谢，
加里
已通过将 Net::SSH::Perl 升级到 v1.41 解决此问题 感谢@daxim
的提示