| line |
true |
false |
branch |
|
26
|
0 |
1 |
if $package eq 'Inline::denter' |
|
37
|
5 |
0 |
if ($o->{'level'} == 0 and $o->{'content'} =~ /^(\w+)\s*$comma\s*(.*)$/) |
|
57
|
4 |
10 |
if ($o->{'content'} =~ /^([\%\@\$])
(\w(?:\w|::)*)?
\s*$/x) { } |
|
|
0 |
10 |
elsif ($o->{'content'} =~ /^\?\s*$/) { } |
|
62
|
0 |
0 |
$1 eq '@' ? : |
|
|
4 |
0 |
$1 eq '%' ? : |
|
64
|
4 |
0 |
if ($1 eq '%') { } |
|
|
0 |
0 |
elsif ($1 eq '@') { } |
|
73
|
0 |
4 |
if length $class |
|
85
|
0 |
0 |
if $ref |
|
93
|
0 |
10 |
if ($o->{'content'} =~ /^\<\<(\w+)(\-?)\s*$/) { } |
|
|
0 |
10 |
elsif ($o->{'content'} =~ /^\"/) { } |
|
102
|
0 |
0 |
if $o->{'done'} |
|
103
|
0 |
0 |
if $chomp |
|
106
|
0 |
0 |
unless $o->{'content'} =~ /^\".*\"\s*$/ |
|
125
|
0 |
9 |
unless defined $key and defined $value |
|
129
|
0 |
4 |
if $o->{'level'} > $level |
|
135
|
9 |
0 |
unless $key =~ /^\<\<(\w+)(\-?)/ |
|
145
|
0 |
0 |
if $o->{'done'} |
|
146
|
0 |
0 |
if $chomp |
|
161
|
0 |
0 |
if $o->{'level'} > $level |
|
171
|
0 |
0 |
if $o->{'level'} != $level |
|
172
|
0 |
0 |
if $o->{'content'} =~ /^[\%\@\$\\]/ |
|
173
|
0 |
0 |
if $o->{'content'} =~ /^\?/ |
|
186
|
0 |
14 |
unless @{$o->{'lines'};} |
|
193
|
1 |
14 |
unless @{$o->{'lines'};} |
|
198
|
0 |
14 |
if /^(\s*$|\#)/ |
|
202
|
0 |
14 |
unless /^(( {$width})*)(\S.*)$/ |