| blib/lib/Plack/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 22 | 31 | 70.9 |
| line | l | !l | condition |
|---|---|---|---|
| 40 | 2 | 7 | $reftype eq 'GLOB' and *{$fh;}{'IO'} |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 183 | 0 | 0 | 1 | ++$i && () |
| 245 | 1637 | 1637 | 89 | $check = !$check and $key eq lc $_ |
| 292 | 25 | 726 | 9 | defined $filter_cb and ref $filter_cb eq 'CODE' |
| line | l | !l | condition |
|---|---|---|---|
| 133 | 0 | 9 | $ENV{'PLACK_ENV'} || 'development' |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 19 | 0 | 47 | 61 | $class =~ s/^\+// or $class =~ /^$prefix/ |
| 36 | 0 | 2 | 11 | -p $fh or -c _ |
| 2 | 0 | 11 | -p $fh or -c _ or -b _ | |
| 40 | 0 | 7 | 2 | $reftype eq 'IO' or $reftype eq 'GLOB' and *{$fh;}{'IO'} |
| 145 | 702 | 0 | 1 | eval { do { &$app($env) } } || do { my $body = 'Internal Server Error'; $env->{'psgi.errors'}->print($@); [500, ['Content-Type', 'text/plain', 'Content-Length', length $body], [$body]] } |
| 267 | 0 | 14 | 658 | $status < 200 || $status == 204 || $status == 304 |