| line |
true |
false |
branch |
|
79
|
1 |
18 |
unless $tagstring and $tagstring =~ /\S/ |
|
101
|
2 |
32 |
defined $2 ? : |
|
102
|
3 |
31 |
defined $5 ? : |
|
103
|
0 |
34 |
if not defined $value and defined $3 |
|
104
|
11 |
23 |
if defined $value |
|
106
|
4 |
30 |
if (exists $tag{$tag}) |
|
107
|
2 |
2 |
if (defined $tag{$tag}) { } |
|
109
|
1 |
1 |
if not defined $value or $value ne $tag{$tag} |
|
111
|
1 |
1 |
if defined $value |
|
119
|
3 |
13 |
unless defined $pos and $pos == length $tagstring |
|
140
|
20 |
4 |
if $str =~ /\A$re\z/ |
|
149
|
0 |
13 |
unless defined $tags |
|
151
|
0 |
13 |
unless ref $tags and ref $tags eq 'HASH' || ref $tags eq 'ARRAY' |
|
154
|
3 |
10 |
if (ref $tags eq "ARRAY") |
|
156
|
1 |
2 |
if grep {not defined $_;} @$tags |
|
164
|
6 |
12 |
defined $value ? : |