Hi
I'm trying to write a simple ssh login script using Net::SSH::Perl. with regular password It's working without a problem, but when I try to use dsa key (my usual dsa key) it doesn't work.here's the scritp:
----------------------------------------------------
--------------------------------------------------------------------------------#!/usr/bin/perl -w use strict; use Net::SSH::Perl; use Net::SSH::Perl::Auth; my @ids = ("/home/haim/.ssh/identity"); my %params = ( protocol => 2, interactive => 1, identity_files => \@ids, ); my $login = Net::SSH::Perl->new("coltrane", %params); my $auth = Net::SSH::Perl::Auth->new('PublicKey', $login); $auth->authenticate; $login->login("haim"); $login->shell;
When I run this script I get an error:
Can't call method "agent" on an undefined value at /usr/local/share
perl/5.8.0/Net/SSH/Perl/Auth/PublicKey.pm line 39, <GEN0> line 1.
I've looked into the Net::SSH::Perl::Agent manpage but I can't figure out
how do I use it.
can anyone please help?
thanx
--
Haim
In reply to problem with Net::SSH::Perl using dsa key authentication by Nabuku
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |