Stories
Slash Boxes
Comments

NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

use Perl

All the Perl that's Practical to Extract and Report

and breathe out More | Login | Reply

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.

Without JavaScript enabled, you might want to use the classic discussion system instead. If you login, you can remember this preference.

Works for me (Score:1)

by petdance (2468)

Thanks for doin' this, Richard. It's awfully handy to be able to have:
my $rules = File::Find::Rule->new->file->name( '*.html' ); $rules->or( $rules->new->directory->name('CVS')->prune->discard, $rules->new ); my @html = $rules->in( './' );
to find all the HTML files in my project.

--
--
xoa
- Re:Works for me (Score:1)
  
  by richardc (1662)
  
  Thanks, though I don't think that does quite what you mean.
  What you've constructed is:
  
  file && name( '*.html' ) && ( ( directory && name( 'CVS' ) && prune && discard ) || anything )
  
  So it won't be pruning any CVS directories, as file && directory won't fire. The matching path is file && name( '*.html' ) && anything. This does give me an idea though, 0.02 will probably let you query which rules fired for a particular file, if there's a wa

Get More Comments

Stories, comments, journals, and other submissions on use Perl; are Copyright 1998-2006, their respective owners.