Branch Coverage

blib/lib/Test/LongString.pm
Criterion Covered Total %
branch 64 74 86.4


line true false branch
30 1 5 if defined $args{'max'}
31 1 5 if defined $args{'lcss'}
32 0 6 if defined $args{'eol'}
43 3 37 unless (defined $s)
44 7 30 if (length $s > $Test::LongString::Max) { }
46 7 0 if (defined $Test::LongString::Context) { }
48 5 2 if $offset < 0
54 2 5 if $offset
74 1 4 if (not defined $str) { }
1 3 elsif (not defined $sub) { }
82 1 2 $index >= 0 ? :
84 2 1 unless ($ok)
92 1 1 if ($Test::LongString::LCSS)
104 1 0 if ($len < $Test::LongString::Max)
106 0 1 $off - $available > 0 ? :
0 1 $off - $available * 2 > 0 ? :
129 696 9137 if (substr($S, $i, 1) eq substr($T, $j, 1))
130 22 674 if ($i == 0 or $j == 0) { }
136 79 617 if ($L[$i][$j] > $length)
156 1 4 if (not defined $str) { }
1 3 elsif (not defined $sub) { }
164 1 2 $index < 0 ? :
166 2 1 unless ($ok)
169 1 1 $line ? :
183 2 11 unless (defined $got and defined $expected)
186 2 0 unless ($ok)
195 1 10 if ($got eq $expected) { }
207 2 8 $line ? :
222 0 2 unless (defined $got and defined $expected)
225 0 0 unless ($ok)
235 1 1 if ($got_nows eq $expected_nows) { }
272 0 5 unless (defined $usable_regex)
279 2 3 $got =~ /$usable_regex/ ? :
280 1 4 if $cmp eq '!~'
283 4 1 unless ($ok)
285 3 1 $cmp eq '=~' ? :
286 3 1 defined $got ? :