blib/lib/JSON/RPC2/TwoWay/Connection.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 18 | 35 | 51.4 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
22 | 0 | 0 | 2 | $opt{'rpc'} and $opt{'rpc'}->isa('JSON::RPC2::TwoWay') |
24 | 1 | 0 | 1 | $opt{'write'} and ref $opt{'write'} eq 'CODE' |
107 | 0 | 1 | 14 | defined $r->{'jsonrpc'} and $r->{'jsonrpc'} eq '2.0' |
109 | 3 | 10 | 1 | exists $r->{'id'} and ref $r->{'id'} |
110 | 0 | 4 | 0 | exists $r->{'id'} and exists $r->{'result'} || defined $r->{'error'} |
130 | 0 | 0 | 1 | defined $e->{'code'} and $e->{'code'} =~ /^-?\d+$/ |
132 | 1 | 0 | 0 | keys %$e == 3 and not exists $e->{'data'} |
line | l | !l | condition |
---|---|---|---|
35 | 1 | 0 | $opt{'debug'} // 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
43 | 0 | 4 | 1 | ref $args eq 'ARRAY' or ref $args eq 'HASH' |
81 | 0 | 0 | 0 | ref $args eq 'ARRAY' or ref $args eq 'HASH' |
110 | 2 | 1 | 1 | exists $r->{'result'} || defined $r->{'error'} |
132 | 0 | 0 | 1 | keys %$e == 3 and not exists $e->{'data'} or keys %$e > 2 |