line |
true |
false |
branch |
273
|
0 |
1 |
unless defined $run_option |
283
|
1 |
0 |
if (-e $schema_file) { } |
289
|
0 |
0 |
if -e $p |
291
|
0 |
0 |
unless -e $self->_schema_file |
306
|
0 |
1 |
if defined $query |
307
|
0 |
1 |
if defined $ids |
311
|
0 |
1 |
if $self->query |
333
|
10 |
1 |
if @_ |
334
|
1 |
0 |
if (not $self->{'_RUN_LEVEL'} or $self->{'_RUN_LEVEL'} < 1) |
353
|
9 |
1 |
if (@_) |
355
|
0 |
9 |
unless ref $a eq 'ARRAY' |
358
|
0 |
9 |
if (@$a) { } |
366
|
10 |
0 |
if $self->{'ids'} |
382
|
8 |
10 |
if @_ |
407
|
1 |
0 |
if ($fname) { } |
408
|
0 |
1 |
unless open $fh, '>', $fname |
442
|
756 |
5104 |
$a =~ /^[0-9]+$/ && $b =~ /^[0-9]+$/ ? : |
443
|
31 |
43 |
if (grep /Any/, @tmp) |
448
|
32 |
42 |
@tmp ? : |
|
68 |
6 |
@als ? : |
501
|
1 |
0 |
if (not $self->{'_RUN_LEVEL'} or $self->{'_RUN_LEVEL'} < 2) |
505
|
0 |
0 |
if exists $self->{'_annotations'} |
507
|
0 |
0 |
wantarray ? : |
|
0 |
0 |
if @ret |
533
|
0 |
0 |
unless defined $id |
534
|
0 |
0 |
unless defined $ac |
535
|
0 |
0 |
unless ref $ac eq 'Bio::Annotation::Collection' |
539
|
0 |
0 |
unless exists $self->{'_annotations'}{$id} |
655
|
0 |
0 |
if (not $self->{'_RUN_LEVEL'} or $self->{'_RUN_LEVEL'} < 2) |
683
|
0 |
0 |
if (not $self->{'_RUN_LEVEL'} or $self->{'_RUN_LEVEL'} < 2) |
691
|
0 |
0 |
wantarray ? : |
722
|
4 |
5 |
unless defined $rl |
723
|
0 |
9 |
unless grep /^$Bio::DB::Query::HIVQuery::RUN_OPTION$/, (0, 1, 2) |
726
|
9 |
0 |
unless (defined $self->{'_RUN_LEVEL'}) |
730
|
0 |
0 |
if ($rl > 0 and !defined($self->{'_RUN_LEVEL'}) || $self->{'_RUN_LEVEL'} <= 0) |
734
|
0 |
0 |
if ($rl > 1 and !defined($self->{'_RUN_LEVEL'}) || $self->{'_RUN_LEVEL'} <= 1) |
778
|
0 |
0 |
if @_ |
795
|
0 |
0 |
if @_ |
813
|
1 |
1 |
if @_ |
830
|
1 |
0 |
if (@_) |
832
|
1 |
0 |
if ($_ eq 'HASH') |
836
|
0 |
0 |
unless ($_) |
868
|
0 |
0 |
unless defined $id |
876
|
1 |
3 |
if @_ |
893
|
1 |
1 |
if @_ |
910
|
1 |
1 |
if @_ |
927
|
1 |
1 |
if @_ |
994
|
1 |
2 |
if @_ |
1014
|
9 |
1 |
$self->{'_schema'} ? : |
1035
|
0 |
5 |
unless $a |
1036
|
5 |
0 |
if (ref $a eq 'ARRAY') { } |
1061
|
0 |
0 |
if (@_) |
1063
|
0 |
0 |
unless ref $r eq 'HTTP::Response' |
1089
|
0 |
9 |
unless (defined $_) |
1095
|
2 |
7 |
if (ref $_ eq 'HASH') |
1097
|
1 |
1 |
if (grep /HASH/, map({ref $_;} values %inhash)) |
1101
|
0 |
1 |
unless defined $inhash{'query'} |
1106
|
3 |
4 |
if (ref $_ eq 'ARRAY') |
1129
|
0 |
17 |
if (grep /^$k$/, @validFields) { } |
|
15 |
2 |
elsif (grep /^$k$/, @validAliases) { } |
1134
|
15 |
1003 |
if (grep /^$k$/, $schema->aliases($_)) |
1148
|
6 |
9 |
ref $qh->{'query'}{$k} eq 'ARRAY' ? : |
1149
|
0 |
15 |
if ($vf->{'type'} eq 'text') { } |
|
15 |
0 |
elsif ($vf->{'type'} eq 'option') { } |
1154
|
0 |
0 |
if $_ eq '' and $vf->{'blank_ok'} eq 'false' |
1162
|
3086 |
0 |
if defined $_ |
|
1 |
20 |
unless $vf->{'option'} and grep {/^$md$/ if defined $_;} @{$$vf{'option'};} |
1170
|
2 |
3 |
if ($qh->{'annot'}) |
1177
|
0 |
2 |
if (grep /^$k$/, @validFields) { } |
|
2 |
0 |
elsif (grep /^$k$/, @validAliases) { } |
1182
|
2 |
128 |
if (grep /^$k$/, $schema->aliases($_)) |
1201
|
5 |
0 |
unless grep /SequenceEntry\.SE_id/, @query |
1202
|
5 |
0 |
unless grep /SequenceAccessions\.SA_GenBankAccession/, @query |
1208
|
5 |
0 |
unless grep /order/, @query |
1219
|
5 |
0 |
if (@qtbl > 1) |
1236
|
5 |
10 |
unless $_ |
1245
|
10 |
5 |
unless (grep /^$fld$/, keys %q) |
1282
|
0 |
0 |
if (not $self->_lanl_query) { } |
1326
|
0 |
0 |
$query[$_] =~ s/^COMMAND\.// ? : |
1327
|
0 |
0 |
$query[$_] =~ /^COMMAND/ ? : |
1332
|
0 |
0 |
unless (grep /^$cp$/, @query) |
1350
|
0 |
0 |
unless ($idPing->is_success) |
1355
|
0 |
0 |
unless ($self->_session_id) |
1357
|
0 |
0 |
unless ($self->_session_id) |
1370
|
0 |
0 |
unless ($interfGet->is_success) |
1376
|
0 |
0 |
unless ($interfGet->content =~ /$search_form_re/) |
1382
|
0 |
0 |
unless ($searchGet->is_success) |
1388
|
0 |
0 |
if (/$no_seqs_found_re/) |
1393
|
0 |
0 |
if (/$too_many_re/) |
1398
|
0 |
0 |
if (/$tbl_no_join_re/) |
1402
|
0 |
0 |
if (/$sys_error_re/) |
1407
|
0 |
0 |
if (/$seqs_found_re/) |
1418
|
0 |
0 |
unless $response->is_success |
1424
|
0 |
0 |
if ($@) |
1425
|
0 |
0 |
unless ($@ =~ /No sequences found/) |
1433
|
0 |
0 |
unless $count |
1463
|
0 |
0 |
unless $self->_lanl_response |
1490
|
0 |
0 |
if $_ eq '#' |