| line |
true |
false |
branch |
|
28
|
0 |
0 |
unless &$handler($renderer, $c, $output, $options) |
|
53
|
8 |
1 |
if $$attrs{'href'} =~ s[^http://search\.cpan\.org/perldoc\?][$doc] |
|
60
|
4 |
3 |
if $str =~ /^\s*(?:\$|Usage:)\s+/m or not $str =~ /[\$\@\%]\w|->\w/m |
|
63
|
0 |
3 |
defined $class ? : |
|
80
|
11 |
5 |
if $e->type eq 'h1' or not @parts |
|
104
|
0 |
3 |
unless $path and -r $path |
|
112
|
0 |
3 |
ref $_[0] eq 'CODE' ? : |
|
|
0 |
3 |
unless defined(my $pod = ref $_[0] eq 'CODE' ? (shift())->() : shift()) |
|
118
|
0 |
3 |
unless eval {
do {
$parser->parse_string_document("$pod");
1
}
} |