Re: Net::FTP

I'm trying to do a GET on files that match a certain pattern. I don't see where the Net::FTP function support like 'mget' etc. I only see 'get'. Any ideas on how this could be implemented? Paul Menard

Comment on Re: Net::FTP

Replies are listed 'Best First'.
Re: Re: Net::FTP by pfaut (Priest) on Feb 27, 2003 at 19:06 UTC
You can implement mget by getting a list of files with 'ls', searching the files you want by passing the returned list through perl's 'grep' and performing a 'get' on the resulting list. Something like the following (untested): `$ftp->get($_) for grep /\.txt$/, $ftp->ls;` [download] `--- print map { my ($m)=1<<hex($_)&11?' ':''; $m.=substr('AHJPacehklnorstu',hex($_),1) } split //,'2fde0abe76c36c914586c';` [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re: Re: Net::FTP
by pfaut (Priest) on Feb 27, 2003 at 19:06 UTC

You can implement mget by getting a list of files with 'ls', searching the files you want by passing the returned list through perl's 'grep' and performing a 'get' on the resulting list. Something like the following (untested):

    $ftp->get($_) for grep /\.txt$/, $ftp->ls;
[download]

---
print map { my ($m)=1<<hex($_)&11?' ':'';
$m.=substr('AHJPacehklnorstu',hex($_),1) }
split //,'2fde0abe76c36c914586c';
[download]

[reply]
[d/l]
[select]