Branch Coverage

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


line true false branch
25 1137 7140 unless ($self->offset)
36 966 7311 if ($self->{'key_md5'})
52 1181 1198 unless ($self->{'size'})
71 68 0 if $s
80 66 2 if $s
89 2 2 if $s
98 8277 29267 unless ($self->{'bucket_size'})
119 44 295 if $md5 eq $e->blank_md5
133 161 63 unless exists $self->{'_next_open'}
143 0 9676 unless (exists $self->{'found'})
155 6798 966 if (@_)
160 0 7764 unless (exists $self->{'key_md5'})
170 3209 15017 if ($potential eq $e->blank_md5)
175 4543 10474 if ($potential eq $self->{'key_md5'})
189 0 2915 unless exists $args->{'key'}
190 0 2915 unless exists $args->{'key_md5'}
191 0 2915 unless exists $args->{'value'}
195 2911 4 unless exists $args->{'trans_id'}
200 2360 555 unless ($self->{'found'})
216 73 2838 if ($args->{'trans_id'}) { }
238 12 42 unless exists $args->{'trans_id'}
247 13 41 if ($args->{'trans_id'}) { }
267 2 50 unless $self->{'found'}
298 0 13676 unless exists $args->{'allow_head'}
299 12761 915 unless exists $args->{'trans_id'}
300 7486 6190 unless exists $args->{'idx'}
309 1103 12573 if ($args->{'trans_id'})
320 1103 12573 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 7339 5429 $loc <= 1 ? :
349 0 535 unless $self->{'found'}
359 50 384 unless defined $idx
361 0 434 if ($idx >= $self->engine->max_buckets)
370 0 434 unless $location