| line |
true |
false |
branch |
|
27
|
64 |
520 |
if $_[1]->isa('PPI::Token::Operator') |
|
60
|
2 |
68 |
if ($@) { } |
|
|
17 |
51 |
elsif (is_silent(\$input)) { } |
|
66
|
18 |
33 |
if defined $output |
|
68
|
8 |
62 |
if (defined $expected and $expected =~ /\.\.\./) { } |
|
74
|
19 |
51 |
if ($comment) |
|
104
|
2 |
269 |
if $end |
|
106
|
6 |
265 |
if (/^=begin\s+doctest\b/) { } |
|
|
53 |
212 |
elsif (not $in_doctest) { } |
|
|
70 |
142 |
elsif (/^(\s*)>>> (.+)/) { } |
|
|
23 |
119 |
elsif (defined $input and /^\s*$/ || /^=cut\b/) { } |
|
|
40 |
79 |
elsif (not defined $input) { } |
|
|
2 |
77 |
elsif (not defined $output and /^$indent\.\.\. (.+)/) { } |
|
|
2 |
75 |
elsif (/^$indent\s*$/) { } |
|
111
|
47 |
23 |
if (defined $input) |
|
120
|
3 |
20 |
if /^=cut\b/ |
|
125
|
3 |
37 |
if (/^=cut\b/) { } |
|
168
|
18 |
52 |
scalar @$self ? : |
|
195
|
10 |
3 |
if ref $result eq 'CODE' |
|
207
|
0 |
9 |
unless $name =~ /[a-z]/ |
|
208
|
5 |
4 |
if ($name =~ /(.+)_returns$/ or $name =~ /^returns$/) |
|
215
|
1 |
3 |
if ref $result eq 'CODE' |