| blib/lib/Hash/Compact.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 18 | 88.8 |
| line | true | false | branch |
|---|---|---|---|
| 12 | 11 | 5 | @_ > 1 && (ref $_[-1] || '') eq 'HASH' ? : |
| 16 | 0 | 16 | if (ref $args || '') ne 'HASH' |
| 34 | 6 | 4 | if (my $raw = $self->options->{$key}{'alias_for'}) |
| 37 | 7 | 3 | if ($self->options->{$key}{'default'}) |
| 45 | 2 | 9 | $alias_map{$key} ? : |
| 53 | 19 | 16 | if (@_ > 1) { } |
| 54 | 0 | 19 | if @_ % 2 |
| 62 | 5 | 14 | if (defined $value and not ref $value and $value eq ($$option{'default'} || '')) { } |
| 92 | 1 | 14 | if (blessed $value and $value->can('to_hash')) { } |