| line |
true |
false |
branch |
|
15
|
6 |
1 |
unless defined $cleanup |
|
17
|
6 |
1 |
$cleanup ? : |
|
35
|
0 |
10 |
unless tie %h, 'SimpleCDB', 'db', 513 |
|
48
|
0 |
181000 |
if $SimpleCDB::ERROR |
|
49
|
720 |
180280 |
if $i == int $m |
|
61
|
0 |
7 |
unless tie %h, 'SimpleCDB', 'db', 0, 0 |
|
69
|
0 |
121000 |
unless $v =~ /$magic/ |
|
70
|
504 |
120496 |
if $i++ == int $m |
|
72
|
0 |
7 |
if $i != $records |
|
83
|
0 |
121 |
unless (tie %h, 'SimpleCDB', 'db', 0) |
|
85
|
0 |
0 |
if ($! == 11) { } |
|
102
|
0 |
641 |
if $SimpleCDB::ERROR |
|
105
|
0 |
641 |
unless $v =~ /$magic/ |
|
107
|
120 |
521 |
if rand() > 0.8 |
|
120
|
6 |
1 |
if $readers |
|
125
|
5 |
15 |
unless ($p) |
|
129
|
6 |
1 |
if ($readers) |
|
131
|
1 |
5 |
if (@kids) { } |
|
155
|
0 |
1 |
if $@ =~ /SIGCHLD/ |
|
166
|
0 |
5 |
if $_ |
|
169
|
0 |
1 |
if $@ =~ /SIGCHLD/ |
|
187
|
1 |
1 |
if ($cleanup) |
|
190
|
0 |
1 |
unless system(('rm', '-rf'), 'db') == 0 |