| line |
true |
false |
branch |
|
41
|
0 |
3 |
if (@p >= 1 and $p[0] =~ /^http/) { }
|
|
|
2 |
1 |
elsif ($p[0] =~ /^-/) { }
|
|
71
|
0 |
3 |
if $proxy
|
|
72
|
0 |
3 |
if defined $auth_callback
|
|
73
|
0 |
3 |
if ($aggregators)
|
|
74
|
0 |
0 |
ref $aggregators eq 'ARRAY' ? :
|
|
90
|
0 |
0 |
if @_
|
|
97
|
0 |
0 |
if $self->debug
|
|
100
|
0 |
0 |
if (ref $aggregator) { }
|
|
|
0 |
0 |
elsif ($aggregator =~ m[^(\w+)\{([^/\}]+)/?(.*)\}$]) { }
|
|
110
|
0 |
0 |
if $mainpart
|
|
118
|
0 |
0 |
if $@
|
|
126
|
0 |
2 |
if (@_)
|
|
130
|
0 |
2 |
unless $d
|
|
139
|
2 |
8 |
if (@_)
|
|
141
|
1 |
1 |
UNIVERSAL::isa($new_dsn, 'Bio::Das::DSN') ? :
|
|
153
|
0 |
4 |
unless $self->default_server and $self->default_dsn
|
|
159
|
0 |
0 |
if (defined $_[0])
|
|
160
|
0 |
0 |
unless ref $_[0] eq 'CODE'
|
|
165
|
0 |
0 |
if @_
|
|
172
|
0 |
6 |
if @_
|
|
179
|
0 |
6 |
if @_
|
|
186
|
0 |
6 |
if @_
|
|
193
|
0 |
6 |
if @_
|
|
213
|
2 |
0 |
if $self->oldstyle_api
|
|
220
|
0 |
1 |
if ($_[0] =~ /^-/) { }
|
|
222
|
0 |
0 |
ref $dsn eq 'ARRAY' ? :
|
|
233
|
0 |
1 |
unless my $default_server = $self->default_server
|
|
244
|
0 |
0 |
unless $dsn
|
|
245
|
0 |
0 |
ref $dsn ? :
|
|
261
|
0 |
1 |
unless $dsn
|
|
262
|
0 |
1 |
ref $dsn ? :
|
|
282
|
0 |
1 |
unless $dsn
|
|
283
|
0 |
1 |
ref $dsn && ref $dsn eq 'ARRAY' ? :
|
|
304
|
0 |
0 |
unless $dsn
|
|
305
|
0 |
0 |
ref $dsn && ref $dsn eq 'ARRAY' ? :
|
|
323
|
0 |
1 |
unless $dsn
|
|
324
|
0 |
1 |
ref $dsn && ref $dsn eq 'ARRAY' ? :
|
|
339
|
2 |
0 |
if (defined $start and defined $stop) { }
|
|
341
|
0 |
2 |
if $$self{'autotypes'}
|
|
342
|
0 |
2 |
if $$self{'autocategories'}
|
|
354
|
0 |
0 |
if @segments == 0
|
|
355
|
0 |
0 |
if wantarray
|
|
356
|
0 |
0 |
if @segments == 1
|
|
366
|
0 |
0 |
if (@_ == 1) { }
|
|
373
|
0 |
0 |
unless $dsn
|
|
374
|
0 |
0 |
ref $dsn && ref $dsn eq 'ARRAY' ? :
|
|
409
|
0 |
2 |
unless $dsn
|
|
410
|
0 |
2 |
ref $dsn && ref $dsn eq 'ARRAY' ? :
|
|
413
|
0 |
2 |
unless $rangetype eq 'overlaps'
|
|
416
|
0 |
2 |
if (not $segments and $seqid)
|
|
426
|
0 |
0 |
if $a->disaggregate($typearray, $typehandler)
|
|
434
|
0 |
0 |
unless $aggregator_methods{$$type[0]}
|
|
439
|
0 |
0 |
defined $$_[1] ? :
|
|
456
|
1 |
1 |
$results[0]->can('results') ? :
|
|
|
2 |
0 |
if @results
|
|
459
|
0 |
2 |
if $iterator
|
|
460
|
1 |
1 |
wantarray ? :
|
|
477
|
1 |
1 |
if (ref $_ eq 'ARRAY') { }
|
|
|
1 |
0 |
elsif ($_->is_success) { }
|
|
483
|
0 |
2 |
unless @f
|
|
508
|
0 |
6 |
unless my $fetcher = $self->make_fetcher($request)
|
|
509
|
0 |
6 |
if $self->debug
|
|
528
|
0 |
126 |
unless $readable or $writable
|
|
533
|
6 |
0 |
if ($result) { }
|
|
534
|
6 |
0 |
if ($result eq 'reading header')
|
|
547
|
0 |
0 |
if ($fetcher->error and $fetcher->error =~ /^401\s/ and $self->auth_callback)
|
|
552
|
0 |
0 |
if ($new_sock)
|
|
558
|
6 |
114 |
unless ($result)
|
|
559
|
0 |
6 |
unless defined $result
|
|
567
|
0 |
6 |
if ($timed_out)
|
|
577
|
5 |
1 |
if ($self->oldstyle_api)
|
|
578
|
0 |
5 |
unless ($$requests[0]->is_success)
|
|
582
|
3 |
2 |
wantarray ? :
|
|
584
|
1 |
0 |
wantarray ? :
|
|
601
|
0 |
0 |
unless defined $callback
|
|
603
|
0 |
0 |
unless defined $$self{'auth_iter'}
|
|
607
|
0 |
0 |
if $$self{'auth_iter'}{$realm} < 0
|
|
611
|
0 |
0 |
if (not defined $user or $user eq '')
|
|
622
|
0 |
0 |
unless my $new_fetcher = $self->make_fetcher($request)
|