line |
true |
false |
branch |
26
|
2 |
84 |
unless $tagstr =~ /$tagstr_re/u |
43
|
12 |
31 |
if defined $x xor defined $y |
44
|
15 |
16 |
unless defined $x |
61
|
39 |
60 |
if length $stem |
64
|
43 |
56 |
length $$pair[1] ? : |
67
|
43 |
56 |
if (exists $$state{$key}) |
71
|
25 |
18 |
unless __differ($value, $existing) |
77
|
6 |
7 |
if defined $value and defined $existing and $value ne $existing |
83
|
7 |
5 |
if $more_to_set and $more_exists |
91
|
33 |
53 |
defined $value ? : |
104
|
14 |
7 |
if exists $$state{$tagstr} |
118
|
2 |
1 |
if ($tagstr =~ s/:($tagvalue_re)\z//u) |
119
|
1 |
1 |
if $$state{$tagstr} // '' eq $1 |