blib/lib/Array/Find.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 60 | 77 | 77.9 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
176 | 29 | 11 | 0 | defined $ws and $ws eq '' |
177 | 29 | 7 | 4 | defined $ws and $ci |
204 | 222 | 277 | 10 | $matched_els[$ia] and $matched_els[$ia][$iel] |
225 | 72 | 24 | 0 | $idx == 0 && ($item_len + $idx == $el_len || index($el, $ws, $item_len + $idx) == $item_len + $idx) |
239 | 257 | 6 | 157 | $mode_infix and not $match |
243 | 44 | 10 | 20 | index($el, $ws, $item_len + $idx) == $item_len + $idx && $idx >= $ws_len && index($el, $ws, $idx - $ws_len) == $idx - $ws_len |
252 | 7 | 2 | 2 | $idx > 0 && $idx < $el_len - $item_len |
257 | 5 | 1 | 1 | $idx2 > -1 && $idx2 < $el_len - $item_len |
262 | 0 | 2 | 0 | $idx2 > -1 && $idx2 < $el_len - $item_len - 1 |
270 | 215 | 21 | 184 | $mode_suffix and not $match |
274 | 58 | 21 | 0 | $idx == $el_len - $item_len && ($idx == 0 || $idx >= $ws_len && index($el, $ws, $idx - $ws_len) == $idx - $ws_len) |
291 | 136 | 7 | 6 | $unique and $res{$el} |
298 | 487 | 0 | 12 | defined $max_compare and $max_compare != 0 |
302 | 137 | 0 | 10 | defined $max_result and $max_result != 0 |
line | l | !l | condition |
---|---|---|---|
171 | 26 | 14 | $args{'mode'} // 'exact' |
183 | 5 | 35 | $args{'unique'} // 0 |
295 | 105 | 44 | $matched_els[$ia] //= [] |
306 | 4 | 4 | $found_items{$i} //= 1 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
175 | 11 | 0 | 29 | $args{'word_sep'} // $args{'ws'} |
225 | 0 | 18 | 78 | $match ||= $idx == 0 && ($item_len + $idx == $el_len || index($el, $ws, $item_len + $idx) == $item_len + $idx) |
234 | 0 | 46 | 8 | $match ||= $idx == 0 |
243 | 0 | 20 | 54 | $match ||= index($el, $ws, $item_len + $idx) == $item_len + $idx && $idx >= $ws_len && index($el, $ws, $idx - $ws_len) == $idx - $ws_len |
252 | 0 | 2 | 9 | $match ||= $idx > 0 && $idx < $el_len - $item_len |
257 | 0 | 1 | 6 | $match ||= $idx2 > -1 && $idx2 < $el_len - $item_len |
262 | 0 | 0 | 2 | $match ||= $idx2 > -1 && $idx2 < $el_len - $item_len - 1 |
274 | 0 | 15 | 64 | $match ||= $idx == $el_len - $item_len && ($idx == 0 || $idx >= $ws_len && index($el, $ws, $idx - $ws_len) == $idx - $ws_len) |
284 | 0 | 12 | 4 | $match ||= $idx == $el_len - $item_len |