| line |
true |
false |
branch |
|
49
|
0 |
1 |
unless ref $code |
|
61
|
0 |
1 |
unless ref $code |
|
70
|
0 |
1 |
unless ref $code |
|
80
|
0 |
1 |
unless ref $code |
|
102
|
2 |
0 |
exists $hash->{$_} ? : |
|
111
|
2 |
0 |
exists $hash->{$_} ? : |
|
127
|
0 |
18 |
if ($adr and $tmp->{$adr}) { } |
|
|
5 |
13 |
elsif ($ref eq 'HASH' or $obj and $obj->isa('Data::Object::Hash')) { } |
|
|
2 |
11 |
elsif ($ref eq 'ARRAY' or $obj and $obj->isa('Data::Object::Array')) { } |
|
131
|
5 |
0 |
if (%$data) { } |
|
133
|
7 |
4 |
$path ? : |
|
142
|
2 |
0 |
if (@$data) { } |
|
144
|
5 |
0 |
$path ? : |
|
179
|
5 |
1 |
defined $hash->{$_} ? : |
|
195
|
1 |
4 |
if $i > $#keys |
|
208
|
0 |
11 |
unless $hash and $path and 'HASH' eq ref $hash || &blessed($hash) && $hash->isa('HASH') |
|
212
|
5 |
11 |
if $hash->{$path} |
|
218
|
3 |
7 |
if $next and $hash->{$next} |
|
221
|
7 |
0 |
if $next and $hash->{$next} |
|
238
|
0 |
4 |
unless @arguments |
|
239
|
0 |
4 |
if @arguments > 1 |
|
249
|
0 |
5 |
ref $rprop eq 'HASH' && ref $lprop eq 'HASH' ? : |
|
266
|
4 |
1 |
if defined $hash->{$_} |
|
287
|
5 |
13 |
if (my(@parts) = $step =~ /^(\w*):(0|[1-9]\d*)$/) { } |
|
291
|
0 |
1 |
exists $$node{$parts[0]}[$parts[1]] ? : |
|
|
4 |
1 |
$last ? : |
|
297
|
4 |
2 |
exists $node->{$step} ? : |
|
|
7 |
6 |
$last ? : |