in reply to Can't get $ssh2->check_hostkey to work
Hello BernieC,
I would suggest to include the Net::SSH2::debug-(-state-) flag it will help you to identify the problem. Then step by step resolve it. I would also suggest to enable the Net::SSH2::blocking-(-flag-)
On my local node this sample of code works. UnixOS not WindowsOS but it should work for you also (I guess).
#!/usr/bin/perl use strict; use warnings; use Net::SSH2; my $ssh2 = Net::SSH2->new(); $ssh2->debug(1); $ssh2->blocking(1); $ssh2->connect('127.0.0.1', 22) # default port 22 or $ssh2->die_with_error; $ssh2->auth( publickey => "/home/user/.ssh/id_rsa"); $ssh2->check_hostkey('ask') or $ssh2->die_with_error; $ssh2->disconnect(); __END__ $ perl test.pl libssh2_knownhost_init(ss->session) -> 0x11b1a60 Net::SSH2::KnownHosts::DESTROY Net::SSH2::DESTROY object 0x13cf7a0
Give it a try and let us know the output.
Hope this helps, BR
|
|---|