On Sun, 21 May 2006, Yutaka Sato wrote:
I also tried it with this Perl snippet without luck:
see attached ZIP file for script and log.
the log was tested with:
perl /tmp/ftp-test.pl ftp://localhost:2121/pub/debian-iso/sarge/
Unfortunately, the STDOUT and STDERR are munged together.
my $ftp = Net::FTP->new($host, Debug => 1)
or die "$@" ;
or die "Cannot login ", $ftp->message;
or die "Cannot change working directory ",
print join("\n", $ftp->dir())