in reply to ftp files from Unix m/c
use strict; use Net::FTP; my $remote_host = "*****************"; my $remote_user = "*******"; my $remote_password = "*******"; my $remote_dir = "/tmp"; my $ftp = Net::FTP->new($remote_host) or die "error initiating ftp: $! +\n"; $ftp->login($remote_user,$remote_password) or die "couldn't login: $!\ +n"; # force binary transmission of files, generally a good idea $ftp->binary(); my @files = $ftp->ls($remote_dir); print join "\n",@files; print "\n","="x80,"\n"; # now change current working directory and do ls there $ftp->cwd($remote_dir); my @files = $ftp->ls(); print join "\n",@files;
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Re: ftp files from Unix m/c
by simeon2000 (Monk) on Jul 22, 2002 at 13:21 UTC |