The following program works for me:This is perl, v5.6.1 built for MSWin32-x86-multi-thread (with 1 regist +ered patch, see perl -V for more detail) Copyright 1987-2001, Larry Wall Binary build 628 provided by ActiveState Tool Corp. http://www.ActiveS +tate.com Built 15:41:05 Jul 4 2001 libnet [1.07.03] Collection of Network protocol modules
I know you said that you just want to get it working, but you should really consider basic error/return code checking as I've done above. Maybe there are additional problems.use strict; use Net::FTP; my $host = 'mysite.net'; my $login = 'mylogin'; my $passwd = 'mypasswd'; my $ftp = Net::FTP->new($host); my $RC = $ftp->login($login, $passwd); if (not $RC) { print "\n\nFTP Login to Remote Host: '$host' failed!\n\n"; print "No files updated from Remote host: '$host'!\n\n"; exit; } ### Delete local copy of remote host ftp files my $infile = "test" . ' ' . "file"; ### also the following works too # my $infile = "test file"; if (-e $infile) { unlink $infile; } ### Make new local copy of remote host ftp files $RC = $ftp->get($infile); if (not $RC) { print "\n\nget command for remote file: '$infile' failed!\n"; print "No files updated from Remote host: '$host'.\n\n"; exit; } $ftp->quit; print "Finished!";
--Jim
In reply to Re: Net::FTP and filenames with spaces
by jlongino
in thread Net::FTP and filenames with spaces
by amelinda
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |