blib/lib/Catalyst/Engine.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 21 | 42 | 50.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
147 | 3 | 0 | 0 | &blessed($body) and $body->can("read") |
237 | 16 | 15 | 0 | ref $val eq "HASH" and exists $val->{'__MOP__'} |
773 | 0 | 0 | 1 | scalar @args and &blessed($args[-1]) |
774 | 0 | 0 | 1 | scalar @args and ref $args[-1] eq "HASH" |
776 | 1 | 0 | 0 | scalar @args and not ref $args[0] |
line | l | !l | condition |
---|---|---|---|
207 | 0 | 7 | $val->{'secure'} || 0 |
0 | 7 | $val->{'httponly'} || 0 | |
271 | 7 | 0 | $error ||= "No output" |
517 | 921 | 10 | $env->{'SERVER_PORT'} || 80 |
518 | 10 | 921 | $env->{'SCRIPT_NAME'} || '/' |
778 | 0 | 0 | $options->{'listen'} ||= [$listen] |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
115 | 6 | 0 | 0 | ref $body eq "GLOB" or ref $body eq "ARRAY" |
147 | 0 | 0 | 3 | &blessed($body) and $body->can("read") or ref $body eq "GLOB" |
252 | 21 | 13 | 0 | ref($c)->config->{'name'} || join(' ', split(/::/, ref $c, 0)) |
516 | 925 | 5 | 1 | $env->{'HTTP_HOST'} || $env->{'SERVER_NAME'} |
546 | 931 | 0 | 0 | $port =~ /^(?:80|443)$/ or $host =~ /:/ |