in reply to net::Ftp::rercursive->rput
UPDATE: I recommend you go with the examples noted above, rather than on the code below, which is untested. In paticular, I'm unable to test the assertion that rput works on *NIX in the manner I mention below.
If you look at the docs for Net::FTP::Recursive, they do a pretty good job of explaining things from a Perl perspective. Here's an example of how the code might go, based on the docs for the module in question:
# WARNING: Untested code! use strict; use warnings; use Net::FTP::Recursive; my $ftp = Net::FTP::Recursive->new("some.host.name", Debug => 0); $ftp->login("anonymous",'email@example.com'); #Change the directory in the below command # to the root of the directories you wish # to upload to $ftp->cwd('/pub'); # You must have your script in the proper # local directory; this module automatically # uploads it's working directory chdir('/home/user/data_to_upload'); # According to docs, rput should "just work" # on Unix-like systems $ftp->rput(); $ftp->quit();
Unless I'm missing something? I hope that works for you; I don't have an FTP site here I can test with.
----Asim, known to some as Woodrow.