Evyn wrote:
Hi all,

I have the following perl script that copies files from one folder to
another:

use File::Copy;
my $filename = 'gar';
for my $file ( <*.$filename> ) {
    # copy each individual file
    move($file, "c:\\Documents\\AudioDownloadsWaiting\\") or die "move
failed: $!";
    }
print "Done";

This works well, but now I need to look for .gar files in all the
subfolders of the current folder too. How do I do this?

Q: Do you want to keep the subfolder structure or do all the files end up in 
one folder?


--
Just my 0.00000002 million dollars worth,
 Shawn

"For the things we have to learn before we can do them, we learn by doing them."
 Aristotle

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to