Net::FTP - Check if file already exists locally before download

mitabrev has asked for the wisdom of the Perl Monks concerning the following question:

Hi Guys,

I've spent certain amount of hours searching for a solution and I couldn't find it.:(
Can you guys help me? I'm sure it's a easy do and that I can't see the forrest from all the trees.

I have a perl script with which I daily download files from a remote FTP server.

$ftp = Net::FTP->new($host, Debug => 0, Passive => 1);
        $ftp->login ($username, $password);
        $ftp->binary();
        @set_of_files = $ftp->ls("*$thismonth-$thisday-$thisyear*.tar"
+);
[download]

etc.
Is it possible with $ftp->get to check if a file already exists on a local folder before downloading it from ftp?

Thank you and best regards,

Mario

Comment on Net::FTP - Check if file already exists locally before download Download Code

Replies are listed 'Best First'.
Re: Net::FTP - Check if file already exists locally before download by hippo (Bishop) on Feb 12, 2019 at 10:52 UTC
Is this what you are looking for? `for my $file (@set_of_files) { $ftp->get ($file) unless -e $file; }` [download]	[reply] [d/l]
Re^2: Net::FTP - Check if file already exists locally before download by mitabrev (Novice) on Feb 12, 2019 at 12:04 UTC
Thanks! Exactly what I thought, couldn't see the easiest solution.	[reply]
Re^2: Net::FTP - Check if file already exists locally before download by mitabrev (Novice) on Mar 11, 2019 at 21:24 UTC
Hi Monks, I got a follow up question. Is it possible to use the same command to check if file exists in two or more different directorites? `for my $file (@set_of_files) { $ftp->get ($file) unless -e /dir1/$file; }` [download] so basically to check: `unless -e /dir1/$file unless -e /dir2/$file` [download] something like that? Thanks again.	[reply] [d/l] [select]
Re^3: Net::FTP - Check if file already exists locally before download by Paladin (Vicar) on Mar 11, 2019 at 21:44 UTC
`for my $file (@set_of_files) { $ftp->get ($file) unless (-e "/dir1/$file" or -e "/dir2/$file"); }` [download]	[reply] [d/l]
Re^4: Net::FTP - Check if file already exists locally before download by mitabrev (Novice) on Mar 12, 2019 at 08:24 UTC


Perl: the Markov chain saw
	PerlMonks