Branch Coverage

blib/lib/PAGI/App/WrapPSGI.pm
Criterion Covered Total %
branch 21 38 55.2


line true false branch
47 2 6 if $scope->{'type'} ne "http"
55 0 6 if $event->{'type'} ne "http.request"
57 6 0 unless $event->{'more'}
61 0 6 unless open my $input, "<", \$body
68 1 5 if (ref $response eq 'CODE') { }
101 1 20 if ($key eq 'CONTENT_TYPE') { }
1 19 elsif ($key eq 'CONTENT_LENGTH') { }
111 6 0 if ($scope->{'server'})
115 6 0 if ($scope->{'client'})
134 4 1 if (ref $body eq 'ARRAY') { }
0 1 elsif (ref $body eq 'CODE') { }
146 0 0 unless defined $chunk
196 0 1 if (@$response == 3) { }
1 0 elsif (@$response == 2) { }
225 1 0 if (@body_chunks)
228 1 0 if (ref $first eq "HASH")
239 0 1 if (defined $body) { }
264 0 0 if (ref $body eq 'ARRAY') { }
0 0 elsif (ref $body eq 'GLOB' or ref $body and $body->can('getline')) { }