blib/lib/List/Sliding/Changes.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 6 | 8 | 75.0 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
84 | 28 | 0 | 80 | $old_offset + $new_offset < scalar @$old and $new_offset < scalar @$new |
28 | 12 | 68 | $old_offset + $new_offset < scalar @$old and $new_offset < scalar @$new and &$equal($$old[$old_offset + $new_offset], $$new[$new_offset]) |
line | l | !l | condition |
---|---|---|---|
77 | 0 | 32 | $equal ||= sub { $_[0] eq $_[1]; } |