1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
|
README for File::Find::Object::Rule
=head1 NAME
File::Find::Object::Rule - Alternative interface to File::Find::Object
=head1 SYNOPSIS
use File::Find::Object::Rule;
# find all the subdirectories of a given directory
my @subdirs = File::Find::Object::Rule->directory->in( $directory );
# find all the .pm files in @INC
my @files = File::Find::Object::Rule->file()
->name( '*.pm' )
->in( @INC );
# as above, but without method chaining
my $rule = File::Find::Object::Rule->new;
$rule->file;
$rule->name( '*.pm' );
my @files = $rule->in( @INC );
=head1 DEPENDENCIES
This module has external dependencies on the following modules:
Cwd
File::Find::Object
File::Spec
Number::Compare
Test::More
Text::Glob
=head1 INSTALLATION
perl Build.PL
perl Build test
and if all goes well
perl Build install
=head1 AUTHOR
=head2 File::Find::Rule
Richard Clamp <richardc@unixbeard.net> with input gained from this
use.perl discussion: http://use.perl.org/~richardc/journal/6467
Additional proofreading and input provided by Kake, Greg McCarroll,
and Andy Lester andy@petdance.com.
=head2 File::Find::Object::Rule
Shlomi Fish converted the code to use L<File::Find::Object> instead. All
copyrights disclaimed.
=head1 COPYRIGHT
Copyright (C) 2002, 2003, 2004, 2006 Richard Clamp. All Rights Reserved.
This module is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
=head1 SEE ALSO
L<File::Find::Object>, L<Text::Glob>, L<Number::Compare>,
L<File::Find::Object::Rule>, find(1)
If you want to know about the procedural interface, see
L<File::Find::Object::Rule::Procedural>, and if you have an idea for a neat
extension L<File::Find::Object::Rule::Extending>
|
