Branch Coverage

blib/lib/HTTP/Message/PSGI.pm
Criterion Covered Total %
branch 32 50 64.0


line true false branch
19 0 348 unless (builtin::blessed($req) and $req->isa("HTTP::Request"))
26 9 339 unless $uri->scheme
27 9 339 unless $uri->host
28 0 348 unless $uri->port
29 2 346 unless not $host or $host eq $uri->host_port
33 0 348 if (ref $content eq 'CODE') { }
34 0 0 if (defined $req->content_length) { }
42 331 17 unless defined $req->content_length
46 0 348 $uri->scheme eq 'https' ? :
73 365 32 if $field =~ /^Content-(Length|Type)$/
75 397 0 unless (exists $env->{$key})
80 0 348 if ($env->{'SCRIPT_NAME'})
85 338 10 if (not defined $env->{'HTTP_HOST'} and $req->uri->can("host"))
87 2 336 if $req->uri->port ne $req->uri->default_port
100 293 37 if (ref $psgi_res eq 'ARRAY') { }
35 2 elsif (ref $psgi_res eq 'CODE') { }
107 1 1 defined $psgi_res ? :
120 305 21 if @$headers
122 295 31 if (ref $body eq 'ARRAY') { }
139 15 311 unless (defined $body)
167 0 0 if ($chunked) { }
171 0 0 if $done
172 0 0 unless (defined $chunk)
176 0 0 unless length $chunk
190 0 0 unless defined $chunk