Hi. Can anyone advise how I can get my Net::SSH::Perl object to use a particular key I have identified in my Net::SSH::Perl::Agent object ?

I have deliberatley simplified down - I will actually iterate over all available keys until I find the one I want ( based on 'comment' ) and then wish to use that particular key

Im unable to try all keys as my target host only allows a few attempts, and I have many keys loaded into the agent ( reducing these available keys is not an option )

Many Thanks !


# Ensure the invoking process has a valid ssh-agent running, and is lo
+aded with an appropriate key, or keys

use warnings;
use strict;

use Net::SSH::Perl::Key;
use Net::SSH::Perl::Agent;
my $agent = Net::SSH::Perl::Agent->new(2);

my ($key, $comment) = $agent->first_identity;

use Net::SSH::Perl;

my $ssh_user = 'myuser';
my $ssh_host = 'myhost';

## How to use the above referenced $key in the following ssh connectio
+n ?? ##

my %ssh_params = ( debug => '1', options => [ "StrictHostKeyChecking n
+o", "UserKnownHostsFile /dev/null" ] );

my $ssh = Net::SSH::Perl->new( $ssh_host, %ssh_params );

my $result = $ssh->login("$ssh_user");

if ( $result ) {
    print "Logged in as ${ssh_user} on host ${ssh_host}\n";
} else {
    print "Failed to login in as ${ssh_user} on host ${ssh_host}\n";
}

[download]

In reply to Net::SSH::Perl and Net::SSH::Perl::Agent by arc444

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.