| blib/lib/Kelp/Routes.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 36 | 48 | 75.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 135 | 259 | 1 | 2 | ref $key and ref $key ne "Regexp" |
| 157 | 235 | 7 | 0 | $tree and ref $tree ne 'ARRAY' || @$tree % 2 != 0 |
| 163 | 236 | 5 | 1 | $val->{'psgi'} and $val->{'bridge'} |
| 173 | 5 | 1 | 13 | $val->{'name'} and $parent->{'name'} |
| 207 | 119 | 133 | 4 | $ref and $ref ne "CODE" |
| 226 | 133 | 0 | 119 | not $ref and $to |
| 238 | 68 | 0 | 31 | $self->rebless && $class->isa($self->base) |
| line | l | !l | condition |
|---|---|---|---|
| 81 | 41 | 0 | $part //= "" |
| 192 | 7 | 234 | $tree //= [] |
| 283 | 260 | 42 | $method //= "" |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 35 | 244 | 0 | 6 | not $parent or ref $parent ne "HASH" |
| 56 | 15 | 0 | 0 | shift() // croak("Route name is missing") |
| 110 | 72 | 114 | 77 | not ref $val or ref $val eq "CODE" |
| 151 | 18 | 0 | 242 | not defined $val->{'dest'} or $error |
| 157 | 0 | 0 | 7 | ref $tree ne 'ARRAY' || @$tree % 2 != 0 |
| 160 | 14 | 7 | 221 | $val->{'bridge'} ||= defined $tree |
| 207 | 0 | 0 | 256 | not $to or $ref and $ref ne "CODE" |