| line |
true |
false |
branch |
|
44
|
35 |
16 |
$segment ? : |
|
46
|
0 |
51 |
unless open $fh, "<$fn" |
|
88
|
2 |
59730 |
unless $$self{'_rec_cur'} >= 0 |
|
99
|
0 |
60000 |
unless $$self{'_seg_size'} * $dseg + $dptr < $$self{'_data_end'} |
|
100
|
0 |
60000 |
unless my $r = read($fh, $buf, $$self{'_data_hlen'}) |
|
102
|
30000 |
0 |
if $r == $$self{'_data_hlen'} |
|
|
30000 |
30000 |
if ($$self{'_version'} == 4) |
|
103
|
29991 |
9 |
if $r == $$self{'_data_hlen'} |
|
|
30000 |
0 |
if ($$self{'_version'} == 5) |
|
105
|
15 |
59985 |
if ($h1 == 0) |
|
108
|
0 |
15 |
if $fh != $$self{'_fh'} |
|
110
|
0 |
15 |
unless seek $fh, $$self{'_data_start'}, 0 |
|
111
|
0 |
15 |
unless read($fh, $buf, $$self{'_data_hlen'}) == $$self{'_data_hlen'} |
|
113
|
6 |
9 |
if ($$self{'_version'} == 4) |
|
114
|
9 |
0 |
if ($$self{'_version'} == 5) |
|
117
|
30000 |
30000 |
if $$self{'_version'} == 4 |
|
118
|
270 |
59730 |
if ($del) { } |
|
119
|
0 |
270 |
unless seek $fh, $h1, 1 |
|
121
|
0 |
59730 |
unless read($fh, $buf, $h1) == $h1 |
|
127
|
15 |
59715 |
if $fh != $$self{'_fh'} |
|
132
|
4 |
59726 |
if $$self{'_rec_cur'} >= $$self{'_rec_tot'} |
|
164
|
0 |
14 |
unless ($$self{'_db_fname'}, $$self{'_db_fpath'}) = fileparse($filename) |
|
168
|
0 |
14 |
unless read($$self{'_fh'}, $buf, 512) == 512 |
|
171
|
0 |
14 |
unless $t == 269620249 |
|
174
|
7 |
7 |
if ($$self{'_version'} == 4) |
|
175
|
7 |
0 |
if ($$self{'_version'} == 5) |
|
179
|
8 |
6 |
if $$self{'_data_start'} > 0 |
|
182
|
7 |
7 |
if ($$self{'_version'} == 4) |
|
192
|
7 |
0 |
if $hdr_kcnt > 0 |
|
195
|
13 |
0 |
if $key_segs > 0 |
|
205
|
7 |
0 |
if ($$self{'_version'} == 5) |
|
215
|
7 |
0 |
if $hdr_kcnt > 0 |
|
218
|
13 |
0 |
if $key_segs > 0 |
|
230
|
0 |
14 |
unless $hdr_zip == 0 |
|
231
|
0 |
14 |
unless $hdr_enc == 0 |
|
235
|
8 |
6 |
$$self{'_data_start'} > 0 ? : |
|
239
|
0 |
14 |
if ($@) |
|
240
|
0 |
0 |
if $$self{'_fh'} |
|
296
|
16 |
16 |
if (@_) |
|
298
|
8 |
8 |
if $rec < 0 |
|
300
|
4 |
12 |
unless $rec >= 0 |
|
301
|
4 |
8 |
unless $rec < $$self{'_rec_tot'} |
|
302
|
2 |
6 |
if $rec < $$self{'_rec_cur'} |
|
306
|
8 |
8 |
if ($@) |
|
328
|
2 |
6 |
unless $$self{'_data_start'} > 0 |
|
329
|
2 |
4 |
if $$self{'_seg_cur'} != 0 |
|
330
|
6 |
0 |
if $$self{'_data_start'} > 0 |
|
332
|
2 |
6 |
if ($@) |
|
338
|
2 |
4 |
if $fh != $$self{'_fh'} |
|
340
|
6 |
0 |
$$self{'_data_start'} > 0 ? : |
|
358
|
2 |
19918 |
unless $$self{'_data_start'} > 0 |
|
363
|
4 |
19916 |
if ($@) |
|
418
|
8 |
4 |
unless exists {map({$_, 1;} @f)}->{$off} |
|
419
|
10 |
2 |
unless exists {map({$_, 1;} @f)}->{$off + $len} |