Branch Coverage

blib/lib/DB/DataStore.pm
Criterion Covered Total %
branch 31 52 59.6


line true false branch
68 0 1 if (@$err)
138 1 3 if ($current_store_id)
141 0 1 unless $old_store
143 1 0 if ($old_store->{'RECORD_SIZE'} >= $save_size)
150 0 0 if $old_store
171 0 2 unless $store_id
188 0 1 unless defined $store_id
205 2 0 if ($store_size >= $record_size)
206 2 0 if (not defined $best_size or $store_size < $best_size)
214 2 1 if ($best_store)
240 6 1 if ($self->{'STORES'}[$store_index])
323 0 6 unless $useSize
324 6 0 unless (-e $filename)
329 0 6 unless CORE::open $FH, "+<$filename"
360 0 0 if ($count > $entries)
465 0 15 unless sysseek $fh, $self->{'RECORD_SIZE'} * ($idx - 1), 0
467 0 15 unless defined $srv
494 5 2 unless $entries
527 19 0 ref $data ? :
530 0 19 if $idx > 1 + $self->entry_count
531 0 19 if $idx > 1 + $self->entry_count
534 6 13 if ($to_write_length < $self->{'RECORD_SIZE'})
539 0 19 unless $to_write_length == $self->{'RECORD_SIZE'}
543 19 0 if sysseek $fh, $self->{'RECORD_SIZE'} * ($idx - 1), 0
641 5 2 unless $self->{'RECYCLER'}->pop
642 2 5 $recycled_id ? :