Branch Coverage

blib/lib/CDB_File/BiIndex.pm
Criterion Covered Total %
branch 39 98 39.8


line true false branch
75 0 1 if $CDB_File::VERSION == 0.9
115 0 2 if $CDB_File::BiIndex::verbose & 32
118 2 0 if ($mode == 1)
121 0 11 if $CDB_File::BiIndex::verbose & 64
125 0 2 if $CDB_File::BiIndex::verbose & 64
155 0 1 unless defined $first_db_name
158 1 0 if (@_) { }
165 0 1 unless $$self{'first_cdb'} = tie(my %first_hash, 'CDB_File', $first_db_name)
168 0 1 unless $$self{'second_cdb'} = tie(my %second_hash, 'CDB_File', $second_db_name)
189 0 0 if $CDB_File::BiIndex::verbose & 32
191 0 0 unless defined $key
194 0 0 unless defined $return
195 0 0 unless ref($return) =~ /ARRAY/
197 0 0 unless @$return
203 0 1 if $CDB_File::BiIndex::verbose & 32
205 0 1 unless defined $key
208 0 1 unless defined $return
209 0 1 unless ref($return) =~ /ARRAY/
211 0 1 unless @$return
315 0 2 if $CDB_File::BiIndex::verbose & 32
323 0 1 if $CDB_File::BiIndex::verbose & 32
338 0 3 if ($CDB_File::BiIndex::verbose & 32)
340 0 0 if (defined $lastkey) { }
345 0 0 if (defined $key) { }
354 1 2 unless (defined $lastkey or defined $key)
356 0 1 if $CDB_File::BiIndex::verbose & 32
361 0 2 if (defined $key and not defined $lastkey && $key eq $lastkey)
372 1 9 unless defined $key
373 1 8 unless $key eq $lastkey
374 0 8 if $CDB_File::BiIndex::verbose & 128
378 0 2 if ($CDB_File::BiIndex::verbose & 64)
379 0 0 if defined $key
380 0 0 unless defined $key
392 0 0 if $CDB_File::BiIndex::verbose & 32
400 0 1 if $CDB_File::BiIndex::verbose & 32
408 0 2 if $CDB_File::BiIndex::verbose & 32
423 0 19 if ($CDB_File::BiIndex::verbose & 32)
425 0 0 if (defined $lastkey) { }
430 0 0 if (defined $key) { }
439 2 17 unless (defined $lastkey or defined $key)
441 0 2 if $CDB_File::BiIndex::verbose & 32
446 0 17 if (defined $key and not defined $lastkey && $key eq $lastkey)
457 2 15 unless defined $key
458 15 0 unless $key eq $lastkey
459 0 0 if $CDB_File::BiIndex::verbose & 128
463 0 17 if ($CDB_File::BiIndex::verbose & 64)
464 0 0 if defined $key
465 0 0 unless defined $key
477 0 2 if $CDB_File::BiIndex::verbose & 32