Branch Coverage

blib/lib/WebService/CIA/Source/DBM.pm
Criterion Covered Total %
branch 5 14 35.7


line true false branch
22 0 2 unless (exists $$opts{'DBM'})
27 1 1 if (exists $$opts{'Mode'} and $$opts{'Mode'} eq 'readwrite') { }
0 1 elsif (-e $$opts{'DBM'}) { }
28 1 0 unless tie %{$$self{'DBM'};}, 'MLDBM', $$opts{'DBM'}, 66, 416
30 0 0 unless tie %{$$self{'DBM'};}, 'MLDBM', $$opts{'DBM'}, 0, 288
44 0 0 if (exists $self->dbm->{$country} and exists $self->dbm->{$country}{$field}) { }
56 0 0 if (exists $self->dbm->{$cc}) { }