| blib/lib/Module/Find.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 24 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 129 | 0 | 2 | if $@ |
| 151 | 0 | 7 | if $@ |
| 161 | 20 | 44 | unless $name and $name ne 'File::Spec'->curdir and substr($name, 0, 1) ne '.' |
| 163 | 8 | 9 | if (-d $_ and $prune) |
| 168 | 9 | 27 | unless /\.pm$/ |
| 181 | 0 | 25 | unless defined $category |
| 187 | 5 | 20 | @Module::Find::ModuleDirs ? : |
| 188 | 1 | 208 | if (ref $inc) { } |
| 189 | 1 | 0 | if (my(@files) = eval { do { $inc->files } }) |
| 191 | 1 | 0 | s/^\Q$category\E::// ? : |
| 200 | 188 | 20 | unless -d $basedir |
| 214 | 0 | 26 | unless ($_ =~ /^(\w+(?:(?:::|')\w+)*)$/)[0] |