| blib/lib/D.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 92 | 9 | 27 | if (my $ref = ref $arg) { } |
| 96 | 0 | 9 | if (defined($proto = $seen->{$refaddr})) { } |
| 1 | 8 | elsif ($ref eq 'ARRAY') { } | |
| 6 | 2 | elsif ($ref eq 'HASH') { } | |
| 1 | 1 | elsif ($ref eq 'REF' or $ref eq 'SCALAR') { } | |
| 118 | 27 | 0 | defined $arg && !($DO_NOT_PROCESS_NUMERIC_VALUE && _is_number($arg)) ? : |
| 122 | 7 | 10 | wantarray ? : |
| 137 | 1 | 11 | unless defined $value |
| 141 | 7 | 4 | $flags & 12288 && !($flags & 16384) ? : |