cómo usar Net :: SSH :: Perl con claves públicas?

Question

estoy tratando de utilizar Net::SSH::Perl a conectarse a través de claves públicas con este código:

my $ssh = Net::SSH::Perl->new($host, debug=>1) || die ...... 

puse la llave en /root/.ssh/id_rsa y /root/.ssh/identity

Se parece que no está tratando de utilizar la clave pública y en lugar de tratar de pedir una contraseña:

consigo esta salida:

 

localhost: Sent key-exchange init (KEXINIT), wait response. 
localhost: Algorithms, c->s: 3des-cbc hmac-sha1 none 
localhost: Algorithms, s->c: 3des-cbc hmac-sha1 none 
localhost: Entering Diffie-Hellman Group 1 key exchange. 
localhost: Sent DH public key, waiting for reply. 
localhost: Received host key, type 'ssh-dss'. 
localhost: Host '10.212.1.201' is known and matches the host key. 
localhost: Computing shared secret key. 
localhost: Verifying server signature. 
localhost: Waiting for NEWKEYS message. 
localhost: Send NEWKEYS. 
localhost: Enabling encryption/MAC/compression. 
localhost: Sending request for user-authentication service. 
localhost: Service accepted: ssh-userauth. 
localhost: Trying empty user-authentication request. 
localhost: Authentication methods that can continue: publickey,gssapi-with-mic,password. 
localhost: Next method to try is publickey. 
localhost: Next method to try is password. 
localhost: Trying password authentication. 
localhost: Will not query passphrase in batch mode. 
localhost: Authentication methods that can continue: publickey,gssapi-with-mic,password. 
localhost: Next method to try is publickey. 
localhost: Next method to try is password. 
localhost: Trying password authentication. 
localhost: Will not query passphrase in batch mode. 
localhost: Authentication methods that can continue: publickey,gssapi-with-mic,password. 
localhost: Next method to try is publickey. 
localhost: Next method to try is password. 
localhost: Trying password authentication. 
localhost: Will not query passphrase in batch mode. 
localhost: Authentication methods that can continue: publickey,gssapi-with-mic,password. 
localhost: Next method to try is publickey. 
localhost: Next method to try is password. 

Answer 1

lo encontraron: ja ve para especificar manualmente la ubicación del archivo de clave:

@KEYFILE = ("/root/.ssh/id_rsa"); 
$ssh = Net::SSH::Perl->new($host, debug=>1, identity_files=>\@KEYFILE)