use strict; use Net::SFTP; my $host = "xxx.xxx.xxx.xxx"; my %args = ( user => 'username', password => 'password', debug => 'false' ); my $sftp = Net::SFTP->new($host, %args); print "connected!";