Condition Coverage

blib/lib/Perlbal/ClientHTTP.pm
Criterion Covered Total %
condition 32 52 61.5


and 3 conditions

line !l l&&!r l&&r condition
83 50 12 1 defined $$self{'content_length_remain'} && $$self{'content_length_remain'} > 0
149 1 10 2 $$self{'service'}{'enable_md5'} && $hd->header('Content-MD5')
161 12 0 0 $$self{'service'}{'max_put_size'} and $clen > $$self{'service'}{'max_put_size'}
168 1 0 11 $clen and defined $$self{'read_ahead'}
1 11 0 $clen and defined $$self{'read_ahead'} and $$self{'read_ahead'} > 0
218 12 0 1 $te and $te eq 'chunked'
221 0 0 1 $eh and $eh =~ /\b100-continue\b/
256 0 32 0 $max_size and $$self{'content_length'} > $max_size
413 0 0 0 $! == 17 and $$self{'put_final_name'}

or 2 conditions

line l !l condition
189 9 3 $1 || ''
242 0 1 $1 || ''

or 3 conditions

line l !l&&r !l&&!r condition
127 44 1 17 $hd->request_method eq 'GET' or $hd->request_method eq 'HEAD'
161 0 0 12 not defined $clen or $clen < 0
0 0 12 not defined $clen or $clen < 0 or $$self{'service'}{'max_put_size'} and $clen > $$self{'service'}{'max_put_size'}
435 0 10 2 $$self{'read_ahead'} or $$self{'content_length_remain'}
10 1 1 $$self{'read_ahead'} or $$self{'content_length_remain'} or $$self{'chunked_upload_state'}
465 0 14 10 $$self{'content_length_remain'} or $$self{'chunked_upload_state'}
486 0 14 10 $$self{'content_length_remain'} or $$self{'chunked_upload_state'}