| blib/lib/Pod/Index/Search.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 6 | 8 | 75.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 68 | 12 | 0 | 12 | $topic =~ /$re_select/ and not $seen{$1}++ |
| 109 | 4 | 8 | 2 | not $$self{'nocase'} and $entry ne $keyword |
| line | l | !l | condition |
|---|---|---|---|
| 41 | 0 | 4 | $$self{'filemap'} ||= sub { my($podname) = @_; my(@path_elems) = split(/::/, $podname, 0); foreach my $inc (@INC) { my $file = catfile($inc, @path_elems); return "$file.pod" if -e "$file.pod"; return "$file.pm" if -e "$file.pm"; } ; return undef; } |