Condition Coverage

blib/lib/Perlbal/BackendHTTP.pm
Criterion Covered Total %
condition 44 84 52.3


and 3 conditions

line !l l&&!r l&&r condition
73 0 0 23 $sock and defined fileno $sock
186 0 18 0 defined $_[0] and $_[0] eq 'EPIPE'
333 113 0 0 defined $NoVerify{$$self{'ipport'}} and $NoVerify{$$self{'ipport'}} < $now
337 90 0 23 not $$self{'client'} and $$self{'state'} eq 'connecting'
351 0 21 1 defined $$self{'service'} and $$self{'service'}{'verify_backend'}
21 0 1 defined $$self{'service'} and $$self{'service'}{'verify_backend'} and not $$self{'has_attention'}
21 0 1 defined $$self{'service'} and $$self{'service'}{'verify_backend'} and not $$self{'has_attention'} and not defined $NoVerify{$$self{'ipport'}}
372 0 52 38 $$self{'client'} and $$self{'buffered_upload_mode'}
420 0 0 1 $$self{'res_headers'} and not $$self{'content_length_remain'}
456 149 0 0 $te and not $te =~ /\bidentity\b/i
475 143 0 6 my $rep = $hd->header('X-REPROXY-FILE') and $self->may_reproxy
130 0 13 my $urls = $hd->header('X-REPROXY-URL') and $self->may_reproxy
130 0 0 my $svcname = $hd->header('X-REPROXY-SERVICE') and $self->may_reproxy
129 1 0 $res_code == 500 and $rqhd->request_method =~ /^GET|HEAD$/
130 0 0 $res_code == 500 and $rqhd->request_method =~ /^GET|HEAD$/ and $client->should_retry_after_500($self)
543 0 128 2 defined $$self{'content_length'} and not $$self{'content_length_remain'}
642 15 120 0 $$self{'pool'} and not $$self{'pool'}->backend_should_live($self)
653 135 0 0 $$svc{'max_backend_uses'} and $$self{'use_count'} > $$svc{'max_backend_uses'}
735 0 0 0 defined $$self{'service'} and $$self{'service'}{'verify_backend'}

or 2 conditions

line l !l condition
68 23 0 $opts ||= {}
276 0 0 $hds->header('X-Forwarded-For') || ''
436 139 11 $NodeStats{$$self{'ipport'}}{'responsecodes'} ||= []
470 128 21 $$self{'content_length'} || 0
472 2 147 $hd->header('X-REPROXY-CACHE-FOR') || 0
661 15 120 $hd->header('Keep-Alive') || ''

or 3 conditions

line l !l&&r !l&&!r condition
96 3 20 0 $$opts{'reportto'} || $svc
105 0 0 1 $self->state eq 'connecting' or $self->state eq 'verifying_backend'
504 15 115 0 $$client{'primary_res_hdrs'} || $hd
519 0 0 15 $rescode == 206 or $rescode == 416
706 1 0 0 $$self{'state'} eq 'connecting' or $$self{'state'} eq 'verifying_backend'