| line |
true |
false |
branch |
|
127
|
1 |
3 |
if @Module::Find::ModuleDirs |
|
132
|
1 |
3 |
if $@ |
|
152
|
1 |
5 |
if @Module::Find::ModuleDirs |
|
157
|
1 |
9 |
if $@ |
|
167
|
25 |
52 |
unless $name and $name ne "File::Spec"->curdir and substr($name, 0, 1) ne "." |
|
169
|
9 |
10 |
if (-d $_ and $prune) |
|
174
|
10 |
33 |
unless /\.pm$/ |
|
187
|
0 |
30 |
unless defined $category |
|
193
|
7 |
23 |
@Module::Find::ModuleDirs ? : |
|
194
|
1 |
240 |
if (ref $inc) { } |
|
195
|
1 |
0 |
if (my(@files) = eval {
do {
$inc->files
}
}) |
|
197
|
1 |
0 |
s/^\Q$category\E::// ? : |
|
206
|
215 |
25 |
unless -d $basedir |
|
220
|
0 |
32 |
unless ($_ =~ /^(\w+(?:(?:::|')\w+)*)$/)[0] |