Condition Coverage

blib/lib/Test/Regexp.pm
Criterion Covered Total %
condition 49 60 81.6


and 3 conditions

line !l l&&!r l&&r condition
86 419 1 1 length $str > 55 and not $arg{'full_text'}
98 40 0 183 $pretty eq $val and not $val =~ /'/
144 24 174 0 $upgrade and $upgrade == 2 || !utf8::is_utf8($subject) && $subject =~ /[\x80-\xFF]/
12 162 0 $downgrade and $downgrade == 2 || utf8::is_utf8($subject) && $subject =~ /[\x80-\xFF]/ && !($subject =~ /[^\x00-\xFF]/)
261 34 78 134 $match and defined $pattern
303 34 130 82 $match and defined $keep_pattern
433 212 1 33 not $match and defined $pattern
443 212 33 1 not $match and defined $keep_pattern

or 2 conditions

line l !l condition
41 7 11 $arg{'import'} //= ['match', 'no_match']
124 0 24 $Test::Builder::deepness // 1
202 106 92 $arg{'captures'} // []
203 78 120 ($arg{'comment'} // $name) // ''
204 24 174 $arg{'utf8_upgrade'} // 1
205 24 174 $arg{'utf8_downgrade'} // 1
206 158 40 $arg{'match'} // 1
239 55 143 $numbered_captures ||= []
240 35 163 $named_captures ||= {}

or 3 conditions

line l !l&&r !l&&!r condition
61 232 387 0 $escape //= $ESCAPE_DEFAULT
144 0 0 174 $upgrade == 2 || !utf8::is_utf8($subject) && $subject =~ /[\x80-\xFF]/
0 0 162 $downgrade == 2 || utf8::is_utf8($subject) && $subject =~ /[\x80-\xFF]/ && !($subject =~ /[^\x00-\xFF]/)
203 8 52 138 $arg{'comment'} // $name
440 29 1 3 !$r || $subject ne $&
451 1 0 0 !$r || $subject ne $&