1File::Find::Rule::Perl(U3s)er Contributed Perl DocumentatFiiolne::Find::Rule::Perl(3)
2
3
4
6 File::Find::Rule::Perl - Common rules for searching for Perl things
7
9 use File::Find::Rule ();
10 use File::Find::Rule::Perl ();
11
12 # Find all Perl files smaller than 10k
13 my @files = File::Find::Rule->perl_file
14 ->size('<10Ki')
15 ->in( $dir );
16
18 I write a lot of things that muck with Perl files. And it always
19 annoyed me that finding "perl files" requires a moderately complex
20 File::Find::Rule pattern.
21
22 File::Find::Rule::Perl provides methods for finding various Perl-
23 related files.
24
26 perl_module
27
28 The "perl_module" rule locates perl modules. That is, files that are
29 named "*.pm".
30
31 This rule is equivalent to "->"file->name( '*.pm' )> and is included
32 primarily for completeness.
33
34 perl_test
35
36 The "perl_test" rule locates perl test scripts. That is, files that are
37 named "*.t".
38
39 This rule is equivalent to "->"file->name( '*.t' )> and is included
40 primarily for completeness.
41
42 perl_installer
43
44 The "perl_installer" rule locates perl distribution installers. That
45 is, it locates "Makefile.PL" and "Build.PL" files.
46
47 perl_script
48
49 The "perl_script" rule locates perl scripts.
50
51 This is any file that ends in .pl, or any files without extensions that
52 have a perl "hash-bang" line.
53
54 perl_file
55
56 The "perl_file" rule locates all files containing Perl code.
57
58 This includes all the files matching the above "perl_module",
59 "perl_test", "perl_installer" and "perl_script" rules.
60
62 Bugs should always be submitted via the CPAN bug tracker
63
64 <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=File-Find-Rule-Perl>
65
66 For other issues, contact the maintainer
67
69 Adam Kennedy <cpan@ali.as>
70
72 <http://ali.as/>, File::Find::Rule, File::Find::Rule::PPI
73
75 Copyright 2006 Adam Kennedy. All rights reserved.
76
77 This program is free software; you can redistribute it and/or modify it
78 under the same terms as Perl itself.
79
80 The full text of the license can be found in the LICENSE file included
81 with this module.
82
83
84
85perl v5.8.8 2006-10-16 File::Find::Rule::Perl(3)