| line |
true |
false |
branch |
|
45
|
0 |
32 |
unless open my $fh, '<:raw', $file |
|
46
|
6 |
26 |
if $lock |
|
61
|
0 |
15 |
if (not defined $$freeze) { } |
|
66
|
7 |
8 |
if ($lock) { } |
|
67
|
0 |
7 |
unless open $fh, '>>:raw', $file |
|
68
|
7 |
0 |
if $lock |
|
73
|
0 |
8 |
unless open $fh, '>:raw', $file |
|
75
|
15 |
0 |
if defined $$freeze |
|
112
|
776 |
686 |
unless defined $addr |
|
113
|
374 |
312 |
if (&reftype($value) eq 'ARRAY') { } |
|
|
312 |
0 |
elsif (&reftype($value) eq 'HASH') { } |
|
115
|
99 |
275 |
if exists $obj_addr->{$addr} |
|
122
|
78 |
234 |
if exists $obj_addr->{$addr} |
|
138
|
855 |
726 |
unless &refaddr($ref) |
|
140
|
399 |
327 |
if (&reftype($ref) eq 'ARRAY') { } |
|
|
327 |
0 |
elsif (&reftype($ref) eq 'HASH') { } |