>>>>> "Rob" == Rob Dixon <[EMAIL PROTECTED]> writes:
Rob> I favour
Rob> print FILE "$_\n" foreach grep /[^.]/, readdir DIR;
Rob> for clarity
But certainly not for correctness! It's easy to look pretty if you don't care
about the right answer. Your regex rejects *any* filename that contains *any*
dot. On a windows system, that'd be just about any file. :)
Nahh, best to ignore yours and look upthread heere.
>> closedir DIR;
>> close FILE;
Rob> Or even
Rob> system "dir /b $path > C:/filelist.txt";
Rob> $? and die "Can't create C:/filelist.txt: $?"
Rob> since portability is not a question
Apparently, since your code isn't portable either. :)
>> s/("[^"]*)("\s+"[^"]*)("\s+"[^"]*)("\s+NA)/$1$file$2$file$3$file$4/;
Rob> Again, I think
Rob> s/("[^"]*)(")/$1$file$2/g;
Rob> is less befuddling.
And less correct. Hmm. Your track record isn't good on this post.
Perhaps you should read and learn more before answering, because a bad answer
is a lot more damaging than *no* answer, especially when correct answers
have already been given elsewhere in the thread.
We appreciate your enthusiasm to help. But in this case, "help" means
"please spend more time reading and less time posting". Or at least
check your answers before posting... that would have been caught here.
--
Randal L. Schwartz - Stonehenge Consulting Services, Inc. - +1 503 777 0095
<merlyn@stonehenge.com> <URL:http://www.stonehenge.com/merlyn/>
Perl/Unix/security consulting, Technical writing, Comedy, etc. etc.
See PerlTraining.Stonehenge.com for onsite and open-enrollment Perl training!
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
