| line |
true |
false |
branch |
|
46
|
72 |
601 |
unless defined $array |
|
62
|
1 |
36 |
if (defined $name and $name ne '*') { } |
|
119
|
1 |
24 |
defined $name && length $name ? : |
|
120
|
24 |
1 |
wantarray ? : |
|
133
|
4 |
1 |
wantarray ? : |
|
160
|
1 |
0 |
if $el |
|
172
|
3 |
0 |
if $el |
|
187
|
1 |
1 |
unless defined $key |
|
188
|
0 |
2 |
if (grep {not UNIVERSAL::isa($_->[1], "HASH");} @{$$self[0];}) |
|
210
|
1 |
2 |
unless defined $re |
|
211
|
0 |
3 |
unless defined $re |
|
218
|
2 |
1 |
$content =~ /^$re$/x ? : |
|
291
|
0 |
1 |
if (ref $value) { } |
|
292
|
0 |
0 |
if ref $v |
|
294
|
21 |
0 |
if not ref $v |
|
311
|
0 |
2 |
if @_ != 2 |
|
314
|
0 |
2 |
if (ref $value) { } |
|
318
|
0 |
0 |
if ref $v and $value == $v |
|
324
|
1 |
12 |
if not ref $v and $value eq $v |
|
339
|
1 |
1 |
unless $self->element_at($index) |
|
368
|
0 |
2 |
unless defined $self->element_at($index) |
|
385
|
0 |
1 |
if @_ != 1 |