Help for this page
package mypackage; @ISA = qw (somethingelse); use BerkeleyDB; use MY::Net::SFTP;
#!/usr/local/bin/perl use Net::SFTP; ... my %params = ( user => 'myusername' , password => 'mypassword'); my $myaddr = '/home/mine/secure'; my $sftp = eval 'Net::SFPT->new($myaddr,%params)';