| blib/lib/Kelp/Request.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 26 | 65.3 |
| line | true | false | branch |
|---|---|---|---|
| 114 | 1 | 1 | unless my $with = $self->headers->header("X-Requested-With") |
| 121 | 29 | 78 | unless $self->content_type |
| 151 | 2 | 145 | unless $req_charset |
| 180 | 1 | 19 | unless $self->is_json |
| 194 | 20 | 57 | if ($self->is_json and $self->app->can("json")) |
| 199 | 50 | 7 | if @_ |
| 212 | 14 | 0 | if @_ |
| 220 | 2 | 0 | if @_ |
| 230 | 17 | 0 | ref $hash eq 'HASH' ? : |
| 233 | 18 | 4 | if @_ |
| 243 | 0 | 0 | unless @_ |
| 245 | 0 | 0 | if (@_ == 1) |
| 247 | 0 | 0 | unless ref $value |