Branch Coverage

blib/lib/MLDBM/Sync/SDBM_File.pm
Criterion Covered Total %
branch 24 34 70.5


line true false branch
23 28 1 if (defined $rv) { }
26 22 6 if length $rv < $segment_length
32 22 1 if (defined $total_rv)
35 22 0 if ($type eq 'G}') { }
0 0 elsif ($type eq 'N}') { }
56 7 12 if (defined $rv) { }
61 1 6 if length $rv < $segment_length
68 13 0 $MLDBM::Sync::SDBM_File::Zlib && length $value >= $segment_length / 2 ? :
72 0 38 if ($index == $MLDBM::Sync::SDBM_File::MaxSegments)
78 13 25 if length $segment == 0
103 12 6 if length $rv < $segment_length
108 12 0 if ($type eq 'G}') { }
0 0 elsif ($type eq 'N}') { }
125 3 2 if (defined $key)
127 30 0 unless ($key =~ /\*\*\d+$/s)
128 30 0 if (my $new_key = _decode_key($key))
147 30 61 $index ? :