blib/lib/AWS/Lambda/PSGI.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 29 | 42 | 69.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
23 | 2 | 0 | 0 | @_ == 1 and ref $_[0] eq "HASH" |
179 | 3 | 0 | 5 | $stage and $path |
3 | 0 | 5 | $stage and $path and $path ne $payload->{'path'} |
line | l | !l | condition |
---|---|---|---|
112 | 5 | 3 | $payload->{'queryStringParameters'} // {} |
113 | 4 | 4 | $payload->{'multiValueQueryStringParameters'} // {} |
129 | 7 | 1 | $payload->{'headers'} // {} |
130 | 6 | 2 | $payload->{'multiValueHeaders'} // {} |
160 | 5 | 3 | $payload->{'body'} // "" |
193 | 6 | 0 | $payload->{'headers'} // {} |
219 | 4 | 2 | $payload->{'body'} // "" |
246 | 1 | 5 | $$multiValueHeaders{lc $k} //= [] |
260 | 4 | 0 | $singleValueHeaders->{'content-type'} // "application/octet-stream" |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
20 | 0 | 2 | 0 | ref $proto || $proto |
31 | 0 | 0 | 2 | $ENV{'PERL5_LAMBDA_PSGI_INVOKE_MODE'} || $ENV{'AWS_LWA_INVOKE_MODE'} |
71 | 0 | 0 | 0 | $ctx ||= $AWS::Lambda::context |
167 | 2 | 2 | 4 | $env->{'CONTENT_LENGTH'} //= &bytes::length($body) |
225 | 3 | 2 | 1 | $env->{'CONTENT_LENGTH'} //= &bytes::length($body) |