blib/lib/JSON/RPC/Legacy/Procedure.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 16 | 0.0 |
line | true | false | branch |
---|---|---|---|
16 | 0 | 0 | $$Procedure{$_[0]} ? : |
34 | 0 | 0 | if ($attr =~ /^([A-Z][a-z]+)(?:\(\s*([^)]*)\s*\))?$/) |
35 | 0 | 0 | if defined $1 |
36 | 0 | 0 | if defined $2 |
39 | 0 | 0 | unless ($ret_type =~ /^Private|Public|Arr|Obj|Bit|Bool|Num|Str|Nil|None/) |
43 | 0 | 0 | if ($ret_type ne 'Private' and defined $args) |
63 | 0 | 0 | unless (defined($declaration = $1)) |
75 | 0 | 0 | if ($arg =~ /([_0-9a-zA-Z]+)(?::([a-z]+))?/) |