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 |