| line |
true |
false |
branch |
|
24
|
0 |
0 |
unless (ref $testsub or $testsub =~ /::/) |
|
28
|
0 |
0 |
unless $pkg eq 'Tester' |
|
39
|
0 |
0 |
unless (fork) |
|
54
|
0 |
0 |
if ($condition) |
|
58
|
0 |
0 |
unless &$sub($condition) |
|
74
|
0 |
0 |
if $Details > 1 |
|
81
|
0 |
0 |
-d '../../t' ? : |
|
|
0 |
0 |
-d '../t' ? : |
|
|
0 |
0 |
-d 't' ? : |
|
89
|
0 |
0 |
unless (-f $testref) |
|
90
|
0 |
0 |
if $Details > 1 |
|
96
|
0 |
0 |
if (open OUT, ">$testout") { } |
|
103
|
0 |
0 |
unless open REF, $testref |
|
109
|
0 |
0 |
unless length($refout = [) ] |
|
110
|
0 |
0 |
if $output[$i] =~ /condition failed/i |
|
111
|
0 |
0 |
if $output[$i] eq $refout |
|
113
|
0 |
0 |
if ($Details) |
|
119
|
0 |
0 |
if ($i <= $#output) { } |
|
|
0 |
0 |
elsif (not eof REF) { } |
|
121
|
0 |
0 |
if $Details |
|
124
|
0 |
0 |
if $Details |
|
127
|
0 |
0 |
if ($notok) { } |
|
133
|
0 |
0 |
if @Details |
|
147
|
0 |
0 |
-d '../../t' ? : |
|
|
0 |
0 |
-d '../t' ? : |
|
|
0 |
0 |
-d 't' ? : |
|
154
|
0 |
0 |
unless (-f $testmodule) |
|
161
|
0 |
0 |
unless (open STDIN, '-|') |
|
176
|
0 |
0 |
if ($range =~ /^(\d+)\.\.(\d+)/) { } |
|
186
|
0 |
0 |
if (s/^(\d+)\.+((?:not )?ok)\s*//) { } |
|
|
0 |
0 |
elsif ($test) { } |
|
189
|
0 |
0 |
if ($status eq 'not ok') |
|
190
|
0 |
0 |
if length $_ |
|
200
|
0 |
0 |
if ($failed) { } |
|
203
|
0 |
0 |
if ($#failed == $[) { } |
|
212
|
0 |
0 |
if (@msgs) { } |
|
213
|
0 |
0 |
if @msgs |
|
219
|
0 |
0 |
unless -f $testout |
|
220
|
0 |
0 |
unless open OUT, $testout |
|
225
|
0 |
0 |
unless $KeepGoing |