Help for this page

Select Code to Download

Select or download this

my $ftps = Net::FTPSSL->new('mysite.org',
                          Port => 21,
                          Encryption => 'E',
...

print "Currently in: " . $ftps->pwd(). "\n";
$ftps->put("/home/user/public_html/cgi-bin/hotels/admin/com.csv") or d
+ie "Cannot upload ", $ftps->message;