Branch Coverage

blib/lib/HTTP/Body.pm
Criterion Covered Total %
branch 45 56 80.3


line true false branch
88 0 28 unless (@_ >= 2)
96 26 0 if ($index >= 0 and !defined($earliest_index) || $index < $earliest_index)
104 25 3 defined $content_length ? :
129 8 20 if ($$self{'cleanup'})
132 0 22 unless $$_{'tempname'}
133 2 18 ref $upload eq 'ARRAY' ? :
150 5 39 if ($$self{'chunked'})
156 3 20 if ($chunk_len == 0) { }
161 1 2 if (my($headers) = $$self{'chunk_buffer'} =~ /(.*)\x0D\x0A/s)
162 1 0 if (my $message = 'HTTP::Message'->parse($headers))
175 18 2 if (CORE::length $$self{'chunk_buffer'} >= $chunk_len) { }
193 20 1 unless ($$self{'state'} eq 'done')
203 39 0 if (defined $_[0])
207 6 33 if ($$self{'length'} > $cl)
215 39 0 unless ($self->state eq 'done')
230 5 45 if @_
252 8 0 if @_
328 3 63 if @_
341 97 21 if (@_ == 2)
345 17 80 if (exists $$self{'param'}{$name}) { }
347 17 0 unless ref $_ eq 'ARRAY'
370 53 70 if (@_ == 2)
374 11 42 if (exists $$self{'upload'}{$name}) { }
376 11 0 unless ref $_ eq 'ARRAY'
409 76 0 if (@_ == 2)
413 15 61 if (exists $$self{'part_data'}{$name}) { }
415 15 0 unless ref $_ eq 'ARRAY'
435 17 54 if @_