Re: File::Copy

[Douglas Wilson]

On 05/12/00, "Chad Wallace <[EMAIL PROTECTED]>" wrote:
> The File::Copy module doesn't support wildcards, does it?  I just tried a
> little test script:
> 
> #!perl -w
> 
> use File::Copy;
> 
> &copy ("C:\\test1\\*.*", "C:\\test2\\");

perldoc File::Copy
There is no mention of wildcards.

you can:
opendir(DIR,"C:/test1") or die "Error opening dir: $!";
my @filelist = grep { !/^.+/ } readdir DIR;
closedir DIR;

for my $file (@filelist) {
 copy(C:/test1/$file, "C:/test2/$file") or die "Error copying $file: $!";
}


HTH,
Douglas Wilson

---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
         [EMAIL PROTECTED]
For non-automated Mailing List support, send email to  
         [EMAIL PROTECTED]