Pulling only certain files with FTP using Perl

I need to pull certain files using perl from a client's FTP Server.
The file names being with EDI322_

What command can I use to only pull files that start with that?
IDCSSupportAsked:
Who is Participating?

Improve company productivity with a Business Account.Sign Up

x
 
wilcoxonConnect With a Mentor Commented:
The simplest isn't really using Perl - for more details see perldoc -f system and man ncftpget:

system('ncftpget', 'EDI322_*') or die $!

Open in new window


In perl, this should do it - for more details/options see perldoc Net::FTP:

use Net::FTP;
my $ftp = $Net::FTP->new('host') or die "could not connect: $@";
$ftp->login('username', 'password') or die "could not login: ", $ftp->message;
my @files = grep /^EDI322_/, $ftp->ls;
foreach my $fil (@files) { $ftp->get($fil) or die "get failed: ", $ftp->message; }

Open in new window

0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.