my %params = (
"protocol" => '2',
"use_pty" => 0,
"options" => ["stricthostkeychecking no"],
"identity_files" => ["client_key","client_key.pub"],
"debug" => 1,
);
$ssh = Net::SSH::Perl->new($server, %params);# debug=>1, identity_files=>\@KEYFILE);
$ssh->login();
####
localhost: Authentication methods that can continue: publickey,password,keyboard-interactive.
localhost: Next method to try is publickey.
localhost: Trying pubkey authentication with key file 'client_key'
Wrong key type at C:/Strawberry/perl/site/lib/Net/SSH/Perl/Auth/PublicKey.pm line 83.
##
##
localhost: Next method to try is publickey.
localhost: Trying pubkey authentication with key file 'client_key.pub'
Use of uninitialized value $object in substitution (s///) at C:/Strawberry/perl/site/lib/Net/SSH/Perl/Key.pm line 109.
Use of uninitialized value $object in substitution (s///) at C:/Strawberry/perl/site/lib/Net/SSH/Perl/Key.pm line 109.
localhost: Will not query passphrase for 'client_key.pub' in batch mode.
Use of uninitialized value $object in substitution (s///) at C:/Strawberry/perl/site/lib/Net/SSH/Perl/Key.pm line 109.
Use of uninitialized value $object in substitution (s///) at C:/Strawberry/perl/site/lib/Net/SSH/Perl/Key.pm line 109.
localhost: Loading private key failed.
localhost: Trying pubkey authentication with key file 'client_key'
Wrong key type at C:/Strawberry/perl/site/lib/Net/SSH/Perl/Auth/PublicKey.pm line 83.