Branch Coverage

blib/lib/Bio/Tools/EUtilities/Info.pm
Criterion Covered Total %
branch 13 18 72.2


line true false branch
22 1 0 if (exists $simple->{'DbList'} and exists $simple->{'DbList'}{'DbName'})
27 1 1 if (exists $simple->{'DbInfo'}) { }
32 1 5 $key eq 'LinkList' ? :
1 6 $key eq 'FieldList' ? :
33 2 5 if ($key eq 'FieldList' or $key eq 'LinkList') { }
35 87 0 if (exists $simple->{'DbInfo'}{'DbName'})
38 41 46 $key eq 'FieldList' ? :
51 0 1 unless ref $simple->{$_}
59 0 0 if (my(@dbs) = $self->get_databases)