Branch Coverage

blib/lib/DBM/Deep/Sector/File/BucketList.pm
Criterion Covered Total %
branch 60 70 85.7


line true false branch
25 607 5768 unless ($self->offset)
36 503 5872 if ($self->{'key_md5'})
52 645 658 unless ($self->{'size'})
71 65 0 if $s
80 63 2 if $s
89 2 2 if $s
98 6375 24390 unless ($self->{'bucket_size'})
119 38 228 if $md5 eq $e->blank_md5
133 98 62 unless exists $self->{'_next_open'}
143 0 7218 unless (exists $self->{'found'})
155 5420 503 if (@_)
160 0 5923 unless (exists $self->{'key_md5'})
170 2466 13007 if ($potential eq $e->blank_md5)
175 3449 9558 if ($potential eq $self->{'key_md5'})
189 0 1823 unless exists $args->{'key'}
190 0 1823 unless exists $args->{'key_md5'}
191 0 1823 unless exists $args->{'value'}
195 1819 4 unless exists $args->{'trans_id'}
200 1629 194 unless ($self->{'found'})
216 73 1750 if ($args->{'trans_id'}) { }
238 12 42 unless exists $args->{'trans_id'}
247 13 41 if ($args->{'trans_id'}) { }
267 2 48 unless $self->{'found'}
298 0 11492 unless exists $args->{'allow_head'}
299 10577 915 unless exists $args->{'trans_id'}
300 5302 6190 unless exists $args->{'idx'}
309 1103 10389 if ($args->{'trans_id'})
320 1103 10389 if ($args->{'trans_id'})
322 283 820 if ($staleness != (my $s = $e->get_txn_staleness_counter($args->{'trans_id'})))
333 908 77 if ($args->{'trans_id'} and not $loc and $args->{'allow_head'})
341 6612 3972 $loc <= 1 ? :
349 0 174 unless $self->{'found'}
359 48 384 unless defined $idx
361 0 432 if ($idx >= $self->engine->max_buckets)
370 0 432 unless $location