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 ? : |