Re: Windows backslash problem

I would recommend using File::Copy:

use File::Copy;
copy("a/b/*.txt","a/");
[download]

Update: I forgot that File::Copy doesn't do globs...

use File::Copy;
my @list = <a/b/*.txt>;
foreach my $file (@list) {
  copy($file,"a/");
}
[download]

Comment on Re: Windows backslash problem Select or Download Code

Replies are listed 'Best First'.
Re: Re: Windows backslash problem by martymart (Deacon) on Jan 23, 2003 at 18:32 UTC
Hi Mr. Muskrat, I just tried your suggestion: `use File::Copy; copy("a/b/.txt","a/");` [download] unfortunately it doesn't seem to work for me. It works fine for an individual file, say: `use File::Copy; copy("a/b/ccc.txt","a/");` [download] not a problem, but when the is put in it doesn't seem to do its job. Any ideas?	[reply] [d/l] [select]