| blib/lib/JSON/RPC/Spec/Procedure.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 18 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 4 | 53 | if (ref $obj ne "HASH") |
| 28 | 3 | 50 | if (defined $obj->{'id'} and ref $obj->{'id'} ne "") |
| 38 | 9 | 41 | if ($method eq "" or $method =~ /\A\.|\A[0-9]+\z/) |
| 42 | 2 | 39 | if $obj->{'jsonrpc'} ne $jsonrpc_version |
| 54 | 8 | 31 | if ($self->_is_notification) |
| 57 | 10 | 21 | if ($err) |
| 59 | 4 | 6 | if ($err =~ /rpc_method_not_found/) { } |
| 2 | 4 | elsif ($err =~ /rpc_invalid_params/) { } | |
| 88 | 6 | 34 | unless ($matched) |