>>>>> "Macromedia" == Macromedia <[EMAIL PROTECTED]> writes:
Macromedia> find D:\mywork -name '*.txt' -exec grep '000;' '{}' \; -print"
use File::Finder;
my @files = File::Finder->name('*.txt')->contains(qr/000;/)->in('D:/mywork');
File::Finder is in the CPAN.
--
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>
