UNIX for Dummies Questions & Answers

#!/usr/local/bin/perl -w
use Net::SFTP;
use File::Copy;
 
my $user=(getpwuid($<))[0];
my $server = "servername";
print "user - $user  server - $server \n";
my %args = ( user => "$user", ssh_args => {port=> 'portnum'} );
$args{debug} = 1;
$args{user} = "user";
my $sftp=Net::SFTP->new($server, %args) or die "could not open connection to $server\n";

Reading configuration data /u/aa88254/.ssh/config
Reading configuration data /etc/ssh_config
Connecting to SERVER, port PORTNUM.
Remote protocol version 2.0, remote software version OpenSSH_5.3p1+sftpfilecontrol-v1.3-hpn13v5
Net::SSH::Perl Version 1.34, protocol version 2.0.
No compat match: OpenSSH_5.3p1+sftpfilecontrol-v1.3-hpn13v5.
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
Entering Diffie-Hellman Group 1 key exchange.
Sent DH public key, waiting for reply.
Received host key, type 'ssh-dss'.
Host 'SERVER' is known and matches the host key.
Computing shared secret key.
Verifying server signature.
Waiting for NEWKEYS message.
Send NEWKEYS.
Enabling encryption/MAC/compression.
Sending request for user-authentication service.
Service accepted: ssh-userauth.
Trying empty user-authentication request.
Authentication methods that can continue: publickey,password,keyboard-interactive.
Next method to try is publickey.
Trying pubkey authentication with key file '/u/aa88254/.ssh/id_dsa'
Authentication methods that can continue: publickey,password,keyboard-interactive.
Next method to try is publickey.
Next method to try is password.
Trying password authentication.
Will not query passphrase in batch mode.
Authentication methods that can continue: publickey,password,keyboard-interactive.
Next method to try is publickey.
Trying pubkey authentication with key file '/u/aa88254/.ssh/id_dsa'
Authentication methods that can continue: publickey,password,keyboard-interactive.
Next method to try is publickey.
Next method to try is password.
Trying password authentication.
Will not query passphrase in batch mode.
Authentication methods that can continue: publickey,password,keyboard-interactive.
Next method to try is publickey.
Trying pubkey authentication with key file '/u/aa88254/.ssh/id_dsa'
Received disconnect message: Too many authentication failures for user
at /data/pp42d1/software/perl-5.8.8/lib/5.8.8/Net/SSH/Perl/AuthMgr.pm line 143

"sftp -o Port=PORTNUM user@server"