and Net::FTP
-8-
-
## long-time operations here:
$ftp = Net::FTP-new($site,
Timeout = 60,
Passive = 1,
Debug = 3)
or die Can't connect: $@\n;
$ftp-login
I am wanting to test to make sure that an ftp transfer in fact takes
place. Searching through newsgroups, saw several recommendations re: Perl
Cookbook's 16.21, which I have used below. I think I have done this
correctly -- code below -- but will this be enough?
I am assuming that if the script
-8-
-
## long-time operations here:
$ftp = Net::FTP-new($site,
Timeout = 60,
Passive = 1,
Debug = 3)
or die Can't connect: $@\n;