Condition Coverage

blib/lib/Perlbal/ClientHTTPBase.pm
Criterion Covered Total %
condition 62 103 60.1


and 3 conditions

line !l l&&!r l&&r condition
136 5 54 149 $persist_client && $rqhd->req_keep_alive($reshd)
175 0 59 149 defined $$self{'res_headers'} && $$self{'res_headers'}->res_keep_alive($$self{'req_headers'})
244 39 0 0 $$self{'service'}{'listener'}{'sslopts'} && $$self{'service'}{'role'} eq 'web_server'
512 33 1 0 $ims and $ims =~ s/; length=(\d+)//
516 33 0 1 $ims eq $lastmod && -f _
523 34 0 0 $ims_len and $ims_len != $size
553 0 0 26 defined $ext && exists $$MimeType{$ext}
678 5 0 6 not $mime and $f =~ /\.(\w+)$/
5 0 6 not $mime and $f =~ /\.(\w+)$/ and $$MimeType{$1}
694 4 1 0 $ims and $ims =~ s/; length=(\d+)//
699 4 0 1 $ims eq $lastmod && -f _
847 1 0 33 $code != 204 and $code != 304
863 0 33 0 $$self{'req_headers'} and $$self{'req_headers'}->request_method eq 'HEAD'
911 0 0 1 defined $$bref and $$self{'req_headers'}
0 0 1 defined $$bref and $$self{'req_headers'} and $$self{'req_headers'}->request_method ne 'HEAD'

or 2 conditions

line l !l condition
131 204 4 $$svc{'persist_client'} || 0
506 1 33 $hd->header('If-Modified-Since') || ''
664 6 1 $$stats{''}[2] || 0
674 11 1 $$stat[2] || 0
685 5 0 $mime ||= 'text/plain'
688 1 4 $hd->header('If-Modified-Since') || ''
771 0 0 $hds->header('X-Forwarded-For') || ''
787 8 7 $filepos ||= 0
884 1 0 shift() || []
886 0 1 shift() || {}
958 0 0 $hd->header('Host') || 'unknown'

or 3 conditions

line l !l&&r !l&&!r condition
130 65 143 0 $$self{'selector_svc'} || $$self{'service'}
175 59 0 149 not defined $$self{'res_headers'} && $$self{'res_headers'}->res_keep_alive($$self{'req_headers'}) or $$self{'do_die'}
373 0 0 0 not defined $rv or $rv <= 0
464 1 45 0 $rm eq 'HEAD' or $rm eq 'GET'
468 1 45 0 $$self{'replacement_uri'} || $hd->request_uri
475 1 0 45 $uri =~ m[/\.\./] or not $uri =~ m[^/]
551 1 0 26 $not_mod or $not_satisfiable
569 1 1 25 $rm eq 'HEAD' or $not_mod
2 0 25 $rm eq 'HEAD' or $not_mod or $not_satisfiable
653 14 0 7 $remain or $$self{'closed'}
718 0 1 4 $hd->request_method eq 'HEAD' or $not_mod
895 0 0 1 $code == 204 or $code == 304