| line |
true |
false |
branch |
|
14
|
1 |
16 |
if (($text // '') eq '' and not @$children) { } |
|
18
|
1 |
15 |
if (ref $text eq 'CODE') { } |
|
23
|
0 |
15 |
if defined $text |
|
26
|
2 |
21 |
if $tag =~ /^[&"]$/ and ref $content eq 'CODE' |
|
37
|
13 |
0 |
unless ref $_ |
|
38
|
0 |
0 |
if (ref $_ eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $_ eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $_ eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (ref $_ eq 'REF') { } |
|
54
|
1 |
16 |
if (ref $tagContent eq 'CODE') { } |
|
|
15 |
1 |
elsif (defined $tagContent) { } |
|
58
|
5 |
10 |
if ref $tagContent eq 'ARRAY' |
|
59
|
1 |
14 |
if ref $tagContent eq 'HASH' |
|
60
|
1 |
14 |
if ref($tagContent) =~ /^(SCALAR|REF)$/ |
|
61
|
8 |
7 |
unless ref $tagContent |
|
64
|
2 |
26 |
if ($tag =~ /^#/) { } |
|
|
1 |
25 |
elsif ($tag =~ /^:attr/ and ref($content) =~ /^(ARRAY|HASH)$/) { } |
|
|
4 |
21 |
elsif ($tag =~ /^:(.*)/) { } |
|
70
|
1 |
0 |
$1 eq 'ARRAY' ? : |
|
95
|
0 |
24 |
unless ($tag) |
|
101
|
3 |
21 |
if (ref $content eq 'CODE') |
|
102
|
1 |
2 |
unless $tag =~ /^\./ |
|
104
|
1 |
2 |
unless $tag =~ /^\./ |
|
108
|
11 |
10 |
if $tag eq '"' |
|
111
|
2 |
8 |
if $tag =~ /^#/ |
|
114
|
0 |
8 |
if $tag =~ /^\?(.*)/ |
|
117
|
0 |
8 |
if ref $content eq 'SCALAR' |