| blib/lib/signatures.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 5 | 8 | 62.5 |
| line | true | false | branch |
|---|---|---|---|
| 45 | 0 | 20 | if (not $_[0] =~ /^(?:(?:Illegal character in prototype)|(?:Prototype after '.')) for /) |
| 46 | 0 | 0 | $old_warn ? : |
| 54 | 16 | 14 | if $called++ |
| 82 | 1 | 16 | unless length $proto |