Branch Coverage

blib/lib/Net/Async/HTTP/Server/Request.pm
Criterion Covered Total %
branch 21 30 70.0


line true false branch
244 1 38 $self->protocol eq 'HTTP/1.0' ? :
254 21 41 if $self->{'is_done'}
274 22 20 unless (defined $self->{'response_status_line'})
278 2 40 if $self->{'is_closed'}
280 0 40 if $self->{'is_done'}
300 0 6 if $self->{'is_closed'}
301 1 5 unless my $len = length $data
318 2 21 if $self->{'is_closed'}
320 0 21 if $self->{'is_done'}
338 0 3 if $self->{'is_closed'}
371 0 0 unless defined $response->protocol
400 2 0 unless defined $response->protocol
402 2 0 unless defined $response->header("Transfer-Encoding")
413 1 1 if length $response->content
460 0 2 unless my $line = $self->{'response_status_line'}