Condition Coverage

blib/lib/PDLA/NiceSlice.pm
Criterion Covered Total %
condition 27 63 42.8


and 3 conditions

line !l l&&!r l&&r condition
14 0 0 0 exists $engine_ok{$engine} and $engine_ok{$engine}
0 0 0 exists $engine_ok{$engine} and not $engine_ok{$engine}
134 0 7292 3869 $got and $txt =~ /[({\[]/
7292 0 3869 $got and $txt =~ /[({\[]/ and $ct++ < 1000
227 660 0 3345 $src =~ /\G($prefixpat)/ and (($found, $dummy, $prefix) = &Text::Balanced::extract_bracketed($src, '()', $prefixpat))[0]
660 0 3345 $src =~ /\G($prefixpat)/ and (($found, $dummy, $prefix) = &Text::Balanced::extract_bracketed($src, '()', $prefixpat))[0] and $ct++ < 1000
266 3 3 1 @modflags > 1 and grep /\?/, @modflags
388 1 0 0 @lines and not $end
392 0 12 0 defined $terminator and /$terminator/
397 0 12 0 defined $reinstator and /$reinstator/
414 1 0 0 $off and @lines
416 0 0 0 defined $reinstator and /$reinstator/
420 0 0 0 defined $terminator and /$terminator/

or 2 conditions

line l !l condition
279 0 1 $call ||= 'slice'
284 3 0 $call ||= 'slice'
289 0 3 $call ||= 'slice'

or 3 conditions

line l !l&&r !l&&!r condition
179 0 0 1544 not defined $args[0] or $args[0] =~ /^\s*$/
180 0 0 1544 not defined $args[1] or $args[1] =~ /^\s*$/
181 1543 0 1 not defined $args[2] or $args[2] =~ /^\s*$/
236 469 1 2875 $prefix =~ /for(each)?(\s+(my|our))?\s+\$\w+(\s|$RE_cmt)*$/s or $prefix =~ /->\s*\$\w+$/s
285 3 0 0 $arg ||= procargs($slicearg)
290 0 3 0 $arg ||= procargs($slicearg)