|
Hello,
I've been doing a bit of automation with Net::SSH::Perl and have a problem I can't seem to resolve. The initial connection to the host takes quite some time compared to the CLI ssh client. I've provided the debug output below to show where the delay is seen.
[dcundiff@???? ~]$ ./ssh_connect.pl
Reading configuration data /home/dcundiff/.ssh/config
Reading configuration data /etc/ssh_config
Connecting to somehost, port ?????.
Remote version string: SSH-2.0-OpenSSH_3.9p1
Remote protocol version 2.0, remote software version OpenSSH_3.9p1
Net::SSH::Perl Version 1.30, protocol version 2.0.
No compat match: OpenSSH_3.9p1.
Connection established.
Sent key-exchange init (KEXINIT), wait response.
Algorithms, c->s: 3des-cbc hmac-sha1 none
Algorithms, s->c: 3des-cbc hmac-sha1 none
12-second pause
Entering Diffie-Hellman Group 1 key exchange.
Sent DH public key, waiting for reply.
Received host key, type 'ssh-dss'.
Host 'somehost' is known and matches the host key.
Computing shared secret key.
12-second pause
Verifying server signature.
4-second pause
After the above pause the connection works at lightspeed. This is not the fastest computer in the world, but it is a Pentium 2.8ghz which should be able to compute keys faster than what I'm seeing. Plus as I said before I don't have nearly as much lag with the CLI client. Any help would be appreciated.
Thanks
|