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/