| line |
true |
false |
branch |
|
16
|
1 |
21 |
if (($text // '') eq '' and not @$children) { } |
|
20
|
3 |
18 |
if (ref $text eq 'CODE') { } |
|
25
|
0 |
18 |
if defined $text |
|
28
|
2 |
24 |
if $tag =~ /^[&"]$/ and ref $content eq 'CODE' |
|
42
|
16 |
0 |
unless ref $_ |
|
43
|
0 |
0 |
if (ref $_ eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $_ eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $_ eq 'SCALAR') { } |
|
|
0 |
0 |
elsif (ref $_ eq 'REF') { } |
|
59
|
3 |
19 |
if (ref $tagContent eq 'CODE') { } |
|
|
18 |
1 |
elsif (defined $tagContent) { } |
|
63
|
5 |
13 |
if ref $tagContent eq 'ARRAY' |
|
64
|
1 |
17 |
if ref $tagContent eq 'HASH' |
|
65
|
1 |
17 |
if ref($tagContent) =~ /^(SCALAR|REF)$/ |
|
66
|
11 |
7 |
unless ref $tagContent |
|
69
|
2 |
29 |
if ($tag =~ /^#/) { } |
|
|
1 |
28 |
elsif ($tag =~ /^:attr/ and ref($content) =~ /^(ARRAY|HASH)$/) { } |
|
|
4 |
24 |
elsif ($tag =~ /^:(.*)/) { } |
|
75
|
1 |
0 |
$1 eq 'ARRAY' ? : |
|
100
|
0 |
29 |
unless ($tag) |
|
106
|
5 |
24 |
if (ref $content eq 'CODE') |
|
107
|
2 |
3 |
unless $tag =~ /^\./ |
|
109
|
2 |
3 |
unless $tag =~ /^\./ |
|
113
|
14 |
10 |
if $tag eq '"' |
|
116
|
2 |
8 |
if $tag =~ /^#/ |
|
119
|
0 |
8 |
if $tag =~ /^\?(.*)/ |
|
122
|
0 |
8 |
if ref $content eq 'SCALAR' |