blib/lib/Kelp/Request.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 21 | 22 | 95.4 |
line | true | false | branch |
---|---|---|---|
34 | 0 | 1 | unless my $with = $self->headers->header("X-Requested-With") |
40 | 33 | 43 | unless $self->content_type |
53 | 21 | 51 | if ($self->is_json and $self->app->can("json")) |
60 | 1 | 20 | unless ref $hash eq "HASH" |
62 | 14 | 7 | if @_ |
63 | 3 | 4 | unless wantarray |
68 | 14 | 28 | if (@_ and wantarray and not $safe_param) |
74 | 28 | 9 | if @_ |
87 | 2 | 8 | unless @_ |
89 | 5 | 3 | if (@_ == 1) |
91 | 4 | 1 | unless ref $value |