| blib/lib/PAGI/Endpoint/HTTP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 25 | 13 | 29 | if $self->can($method) |
| 28 | 6 | 0 | if $self->can("get") and not $self->can("head") |
| 30 | 6 | 0 | unless grep {$_ eq "OPTIONS";} @allowed |
| 41 | 2 | 11 | if ($http_method eq 'options' and not $self->can('options')) { } |
| 1 | 10 | elsif ($http_method eq 'head' and not $self->can('head') and $self->can('get')) { } | |
| 7 | 3 | elsif ($self->can($http_method)) { } | |
| 59 | 1 | 12 | unless builtin::blessed($res) and $res->can("respond") |
| 73 | 0 | 7 | unless $type eq "http" |