| blib/lib/Data/KeyDiff.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 7 | 16 | 43.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 199 | 0 | 6 | 0 | $_[0] and $_[0] eq 'Data::KeyDiff' |
| 226 | 24 | 0 | 0 | $ignore and &$ignore($item) |
| 237 | 32 | 0 | 0 | $ignore and &$ignore($item) |
| 239 | 0 | 24 | 8 | $is_new and &$is_new($value, $item) |
| line | l | !l | condition |
|---|---|---|---|
| 206 | 6 | 0 | $in{'key'} || $in{'get_key'} || sub { return shift(); } |
| 213 | 6 | 0 | $in{'is_different'} || $in{'compare'} || sub { my $left = shift(); my $right = shift(); return defined $left ^ defined $right || defined $left && $left ne $right; } |