| line |
true |
false |
branch |
|
18
|
0 |
2 |
if $@ |
|
38
|
0 |
4 |
if (not $style) { } |
|
|
0 |
4 |
elsif ($style eq 'die') { } |
|
|
0 |
4 |
elsif ($style eq 'warn') { } |
|
|
0 |
4 |
elsif ($style eq 'confess') { } |
|
|
0 |
4 |
elsif ($style eq 'cluck') { } |
|
|
4 |
0 |
elsif ($style eq 'test' or $style eq 'test/ok') { } |
|
58
|
1 |
3 |
if $style eq 'test/ok' |
|
74
|
1 |
1 |
unless defined $number and $number =~ /^\d+$/ |
|
84
|
2 |
0 |
if ($Test::Assertions::test_mode and defined $Test::Assertions::planned_tests) |
|
85
|
0 |
2 |
if ($Test::Assertions::test_no != $Test::Assertions::planned_tests) |
|
112
|
0 |
59 |
if ($Test::Assertions::ignore{$Test::Assertions::test_no} or %Test::Assertions::only and not $Test::Assertions::only{$Test::Assertions::test_no}) { } |
|
119
|
59 |
0 |
$test ? : |
|
121
|
58 |
1 |
if defined $msg |
|
129
|
0 |
0 |
if defined $msg |
|
131
|
0 |
0 |
unless $test |
|
138
|
0 |
0 |
if defined $msg |
|
140
|
0 |
0 |
unless $test |
|
148
|
0 |
0 |
if defined $msg |
|
150
|
0 |
0 |
if (caller 1) { } |
|
155
|
0 |
0 |
unless $test |
|
163
|
0 |
0 |
if defined $msg |
|
165
|
0 |
0 |
if (caller 1) { } |
|
170
|
0 |
0 |
unless $test |
|
187
|
0 |
0 |
if $strict |
|
191
|
0 |
0 |
if ($strref and ref $strref eq 'SCALAR') { } |
|
201
|
0 |
0 |
wantarray ? : |
|
234
|
1 |
0 |
unless defined $timeout |
|
240
|
0 |
1 |
unless open *FH, "$file |" |
|
246
|
0 |
1 |
if ($@) { } |
|
|
0 |
1 |
elsif ($?) { } |
|
253
|
0 |
1 |
wantarray ? : |
|
262
|
2 |
4 |
if (${$tests;}[0] =~ /^1\.\.(\d+)$/) { } |
|
271
|
3 |
8 |
if (/^not ok/) { } |
|
|
6 |
2 |
elsif (/^ok/) { } |
|
274
|
0 |
3 |
if ($verbose) |
|
287
|
3 |
3 |
if (defined $name) { } |
|
288
|
3 |
3 |
if ($errors) { } |
|
|
1 |
2 |
elsif ($expected != -1 and $total != $expected) { } |
|
298
|
0 |
2 |
$verbose ? : |
|
300
|
2 |
4 |
wantarray ? : |
|
342
|
0 |
1 |
unless open LI, $filename |
|
346
|
2 |
24 |
if /\bASSERT[\s\(]/ |
|
347
|
0 |
26 |
if $Test::Assertions::use_ok and /\bok[\s\(]/ |
|
356
|
1 |
23 |
unless open FH, $filename |
|
367
|
0 |
18 |
unless open FH, ">$filename" |