| blib/lib/Data/Dump/Sexp.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 20 | 20 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 21 | 1 | 21 | if (not defined $expr) { } |
| 11 | 10 | elsif (&looks_like_number($expr)) { } | |
| 43 | 5 | 1 | if (defined $cdr) |
| 64 | 2 | 45 | if (eval { do { $expr->can('to_sexp') } }) { } |
| 6 | 39 | elsif (eval { do { $expr->isa('Data::SExpression::Symbol') } }) { } | |
| 6 | 33 | elsif (eval { do { $expr->isa('Data::SExpression::Cons') } }) { } | |
| 22 | 11 | elsif (not defined $type) { } | |
| 2 | 9 | elsif ($type eq 'ARRAY') { } | |
| 2 | 7 | elsif ($type eq 'HASH') { } | |
| 6 | 1 | elsif ($type eq 'SCALAR' or $type eq 'REF' or $type eq 'LVALUE') { } |