I have been able to put but can't seem to get Mabey it is not as simple a just reversing the process but I can't seem to find much info on it out there..
#!/usr/local/bin/perl5 require 'ftplib.pl'; $FtpHost = "panix.com"; if (&ftp::open($FtpHost) != 1) { die "can't open $FtpHost\n"; } if (&ftp::cwd(pub) != 2) { die "Can't change directories\n"; } if (&ftp::cwd(gizmo) != 2) { die "Can't change directories\n"; } @dirList = ftp::list(); foreach (@dirList) { print("\t$_\n"); } $file = 'ninpaths.txt'; if (&ftp::get($file) != 1) { die "cannot get $file\n"; } &ftp::close;
20060512 Janitored by Corion: Exchanged PRE for CODE tag
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |