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; } |