Branch Coverage

blib/lib/Bio/DB/BioFetch.pm
Criterion Covered Total %
branch 24 42 57.1


line true false branch
210 5 0 unless $self->url_base_address
232 0 0 if $config{'dbname'}
350 0 8 unless defined $uids
359 2 6 ref $uids ? :
361 2 6 ref $uids ? :
408 12 62 if (@_)
414 0 12 if ($db eq 'refseq')
418 0 12 unless $Bio::DB::BioFetch::FORMATMAP{$db}
448 0 1 if ($args{'type'} eq 'string') { }
1 0 elsif ($args{'type'} eq 'file') { }
450 0 0 if ($$stringref =~ /^ERROR (\d+) (.+)/m)
456 0 1 unless open my $F, '<', $args{'location'}
461 0 1 if (join('', @data) =~ /^ERROR (\d+) (.+)/m)
488 22 12 if (defined $value)
492 0 22 if $self->verbose > 0
496 0 6 unless $format eq 'default' or $Bio::DB::BioFetch::FORMATMAP{$db}{$format}
545 1 5 if $id =~ /NT_/
550 1 4 if ($id =~ /^(AC|NC|NG|NM|NR|NS)_/ and $self->db ne 'refseqn') { }
0 8 elsif ($id =~ /^(AP|NP|XP|YP)_/ and $self->db ne 'refseqp') { }
551 1 0 if $self->verbose >= 0
555 0 0 if $self->verbose >= 0