| line |
true |
false |
branch |
|
38
|
1 |
42 |
if ($$options{'read_only'} and $$options{'auto_commit'}) |
|
42
|
5 |
37 |
if ($$_self{'read_only'}) |
|
47
|
37 |
5 |
if ($$_self{'lock'}) |
|
48
|
2 |
35 |
if ref $$_self{'lock'} |
|
50
|
1 |
36 |
unless (defined $lock) |
|
58
|
23 |
18 |
if (-e $fname and not $$_self{'write_only'}) { } |
|
63
|
5 |
18 |
if ($str =~ /^\$data = /) { } |
|
|
14 |
4 |
elsif ($str =~ /^{/) { } |
|
65
|
0 |
5 |
unless $data |
|
66
|
0 |
5 |
unless ref $data |
|
68
|
2 |
3 |
if $$_self{'format'} eq 'auto' |
|
71
|
13 |
1 |
if $$_self{'format'} eq 'auto' |
|
75
|
2 |
2 |
if $$_self{'format'} eq 'auto' |
|
78
|
7 |
11 |
if $$_self{'format'} eq 'auto' |
|
91
|
0 |
27 |
if ($$_self{'removed'}) |
|
94
|
1 |
26 |
if ($$_self{'read_only'}) |
|
103
|
6 |
20 |
if ($$_self{'format'} eq 'dumper') { } |
|
|
13 |
7 |
elsif ($$_self{'format'} eq 'json') { } |
|
116
|
0 |
25 |
unless print {$tmp;} $serialized |
|
118
|
1 |
24 |
if defined $$_self{'mode'} |
|
128
|
0 |
41 |
if ($$_self{'auto_commit'} and not $$self{'removed'}) { } |
|
134
|
0 |
0 |
unless ($commited) |
|
147
|
0 |
2 |
if ($$_self{'read_only'}) |
|
150
|
1 |
1 |
if (-e $$_self{'fname'}) |
|
151
|
0 |
1 |
unless unlink $$_self{'fname'} |
|
153
|
2 |
0 |
if ($$_self{'lock'}) |
|
155
|
2 |
0 |
if (-e $lock_fname) |
|
156
|
0 |
2 |
unless unlink $lock_fname |