| blib/lib/Data/Recursive/Encode.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 19 | 20 | 95.0 |
| line | true | false | branch |
|---|---|---|---|
| 21 | 29 | 51 | if (my $ref = ref $arg) { } |
| 25 | 1 | 28 | if (defined($proto = $$seen{$refaddr})) { } |
| 8 | 20 | elsif ($ref eq 'ARRAY') { } | |
| 8 | 12 | elsif ($ref eq 'HASH') { } | |
| 4 | 8 | elsif ($ref eq 'REF' or $ref eq 'SCALAR') { } | |
| 47 | 50 | 1 | defined $arg && !($DO_NOT_PROCESS_NUMERIC_VALUE && _is_number($arg)) ? : |
| 51 | 52 | 8 | wantarray ? : |
| 82 | 0 | 1 | unless @_ >= 4 |
| 93 | 1 | 13 | unless defined $value |
| 97 | 8 | 5 | $flags & 12288 && !($flags & 16384) ? : |