| line |
true |
false |
branch |
|
58
|
0 |
26 |
unless defined $class
|
|
110
|
0 |
420 |
unless defined $string
|
|
112
|
392 |
28 |
if length $string <= $maxlength
|
|
118
|
835 |
29 |
if (length $line . $word <= $maxlength) { }
|
|
121
|
22 |
7 |
if $line ne ''
|
|
125
|
7 |
22 |
if (length $word > $maxlength) { }
|
|
129
|
7 |
0 |
if (defined $lastline and $lastline ne '')
|
|
137
|
28 |
0 |
if $line ne ''
|
|
140
|
57 |
0 |
/^\s*(.+?)\s*$/ ? :
|
|
156
|
24 |
0 |
if (defined $INC{$package_filename})
|
|
163
|
4 |
20 |
unless defined $package_filepath and -e $package_filepath
|
|
175
|
4 |
20 |
unless $package_filepath
|
|
195
|
20 |
15 |
if ($element->isa('Pod::Elemental::Element::Pod5::Nonpod')) { }
|
|
|
13 |
4 |
elsif ($element->isa('Pod::Elemental::Element::Nested') and $element->command eq 'head1') { }
|
|
196
|
1 |
19 |
if ($element->content =~ /^\s*#+\s*ABSTRACT:\s*(.+)$/m)
|
|
203
|
2 |
11 |
if ($element->content eq 'NAME') { }
|
|
205
|
0 |
2 |
unless defined $content
|
|
211
|
0 |
11 |
unless defined $content
|
|
225
|
13 |
48 |
unless (defined $indent)
|
|
231
|
13 |
48 |
if (ref $node eq 'ARRAY') { }
|
|
241
|
2 |
21 |
if $content =~ /^=cut/
|
|
270
|
7 |
52 |
unless scalar @lines
|