| line |
true |
false |
branch |
|
63
|
5571 |
102 |
if (my $id = $entry->id)
|
|
71
|
1 |
5570 |
if (ref $entry->data and refaddr $object == refaddr($entry->data))
|
|
87
|
213 |
2719 |
if (defined(my $obj = $l->id_to_object($entry->id))) { }
|
|
112
|
3731 |
2608 |
if ($self->queue) { }
|
|
122
|
2608 |
0 |
if (ref $ref) { }
|
|
124
|
1088 |
1520 |
if $ref->is_weak
|
|
134
|
2984 |
2384 |
if ($self->queue) { }
|
|
146
|
2232 |
2138 |
unless $self->queue
|
|
157
|
906 |
1232 |
if (@queue)
|
|
162
|
3731 |
0 |
ref $ref ? :
|
|
173
|
1678 |
2053 |
if ref $data and $data->is_weak
|
|
177
|
1662 |
476 |
if (@deferred)
|
|
191
|
273 |
26583 |
if (not ref $data) { }
|
|
|
6339 |
20244 |
elsif (ref $data eq 'KiokuDB::Reference') { }
|
|
|
5727 |
14517 |
elsif (ref $data eq 'KiokuDB::Entry') { }
|
|
|
294 |
14223 |
elsif (ref $data eq 'HASH') { }
|
|
|
14103 |
120 |
elsif (ref $data eq 'ARRAY') { }
|
|
|
37 |
83 |
elsif (ref $data eq 'SCALAR') { }
|
|
|
6 |
77 |
elsif (ref $data eq 'REF') { }
|
|
196
|
5464 |
263 |
if (my $class = $data->class) { }
|
|
206
|
35 |
228 |
if (my $tie = $data->tied)
|
|
207
|
35 |
0 |
if ($tie eq 'H') { }
|
|
|
0 |
0 |
elsif ($tie eq 'A') { }
|
|
|
0 |
0 |
elsif ($tie eq 'G') { }
|
|
|
0 |
0 |
elsif ($tie eq 'S') { }
|
|
232
|
151 |
143 |
if $entry
|
|
239
|
107 |
13996 |
if $entry
|
|
247
|
25 |
12 |
if $entry
|
|
251
|
0 |
6 |
if $entry
|
|
255
|
77 |
0 |
if (&blessed($data)) { }
|
|
257
|
1 |
76 |
if $entry
|
|
268
|
1824 |
620 |
if @ids == 1
|
|
292
|
524 |
96 |
if (my(@load) = grep({not $entries{$_};} @ids))
|
|
304
|
0 |
524 |
if (@entries != @ids or grep {not $_;} @entries)
|
|
334
|
1488 |
2949 |
if (defined(my $obj = $self->live_objects->id_to_object($id))) { }
|
|
371
|
69 |
2890 |
unless my $entry = ($self->backend->get($id))[0]
|