search

briandfoy / net-ssh-perl

Development on the Net::SSH::Perl module to support latest ciphers, key exchange mechanisms, etc.
Other
4 stars 1 forks source link

Can't support SSH1 only - Use of uninitialized value $set_proto ... #60

Open briandfoy opened 1 year ago

briandfoy commented 1 year ago

This ticket was imported from rt.cpan.org 132041

# perl  perl_ssh.pl 
Use of uninitialized value $set_proto in numeric eq (==) at /usr/local/lib64/perl5/Net/SSH/Perl.pm line 345.
Use of uninitialized value $proto in numeric eq (==) at /usr/local/lib64/perl5/Net/SSH/Perl.pm line 53.
Use of uninitialized value in numeric eq (==) at /usr/local/lib64/perl5/Net/SSH/Perl/Packet.pm line 72.
Use of uninitialized value in numeric eq (==) at /usr/local/lib64/perl5/Net/SSH/Perl.pm line 385.
Connection closed by remote host. at /usr/local/lib64/perl5/Net/SSH/Perl/SSH1.pm line 89.
[root@ca9 ~]# cat   perl_ssh.pl     
#!perl -w
use strict;

use Net::SSH::Perl;
my $host='(the host)';
my $ssh = Net::SSH::Perl->new($host, 'protocol' => '1');