| blib/lib/Arguments.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 30 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 46 | 0 | 0 | defined $_ ? : |
| 62 | 0 | 0 | unless my $gv = Devel::Peek::CvGV($code) |
| 139 | 0 | 0 | if (exists $Arguments::ARGUMENT_CHECKS{$a}) { } |
| 0 | 0 | elsif ($a =~ m[^/]) { } | |
| 146 | 0 | 0 | if ($@) |
| 158 | 0 | 0 | if ($@) |
| 183 | 0 | 0 | if $@ |
| 194 | 0 | 0 | unless defined $prototype or @arguments |
| 200 | 0 | 0 | if ($ref) { } |
| 0 | 0 | elsif ($token eq ';') { } | |
| 0 | 0 | elsif ($token eq '\\') { } | |
| 202 | 0 | 0 | $opt ? : |
| 211 | 0 | 0 | $opt ? : |
| 216 | 0 | 0 | if @arguments < @prototypes |
| 218 | 0 | 0 | if @arguments > @prototypes |