line |
true |
false |
branch |
95
|
7 |
1 |
unless $$arg{'ignore_invalid'} |
98
|
3 |
3 |
if (my $id_attr = delete $$arg{'attr'}{'id'}) |
100
|
2 |
1 |
unless defined $$arg{'attr'}{'name'} |
104
|
12 |
6 |
ref $option ? : |
109
|
15 |
3 |
if not defined $id and defined $$arg{'attr'}{'name'} |
112
|
18 |
0 |
if defined $id |
116
|
4 |
14 |
if defined $$arg{'value'} and $$arg{'value'} eq $value |
122
|
18 |
0 |
if (not $$arg{'parts'} and defined $id) { } |
132
|
0 |
6 |
if wantarray and $$arg{'parts'} |
147
|
15 |
6 |
ref $_ ? : |
149
|
6 |
1 |
if (defined $value) |
152
|
1 |
5 |
if (not $matches) { } |
|
1 |
4 |
elsif ($matches > 1) { } |