------ perl code ------------ use Net::SSH::Perl; use Net::SSH::Perl; my %param = ( protocol => '2,1', ciphers => 'RC4', port => 22, debug => 1, ); my $ssh = Net::SSH::Perl->new("esp-ueh05",%param); my $rc = $ssh->login("esp", "test"); ------debug message--------- AWU: Sent key-exchange init (KEXINIT), wait response. AWU: Algorithms, c->s: arcfour hmac-sha1 none AWU: Algorithms, s->c: arcfour hmac-sha1 none AWU: Entering Diffie-Hellman Group 1 key exchange. AWU: Sent DH public key, waiting for reply. AWU: Received host key, type 'ssh-dss'. AWU: Host 'esp-ueh05' is known and matches the host key. AWU: Computing shared secret key. AWU: Verifying server signature. AWU: Waiting for NEWKEYS message. AWU: Enabling incoming encryption/MAC/compression. AWU: Send NEWKEYS, enable outgoing encryption/MAC/compression. AWU: Sending request for user-authentication service. AWU: Service accepted: ssh-userauth. AWU: Trying empty user-authentication request. AWU: Authentication methods that can continue: publickey,gssapi-with-mic,password. AWU: Next method to try is publickey. AWU: Next method to try is password. AWU: Trying password authentication. AWU: Authentication methods that can continue: publickey,gssapi-with-mic,password. AWU: Next method to try is publickey. AWU: Next method to try is password. AWU: Trying password authentication. AWU: Authentication methods that can continue: publickey,gssapi-with-mic,password. AWU: Next method to try is publickey. AWU: Next method to try is password. AWU: Trying password authentication. AWU: Authentication methods that can continue: publickey,gssapi-with-mic,password. AWU: Next method to try is publickey. AWU: Next method to try is password. Permission denied at C:\Perforce\awu_esp\dev\ssit\PC\configSlimcat.pl line 8