| line |
true |
false |
branch |
|
69
|
0 |
0 |
if (@_ == 1) |
|
82
|
0 |
0 |
unless my $class = shift() |
|
92
|
0 |
0 |
unless my(@t) = $self->get_all_tests($class, $superclasses) |
|
107
|
0 |
0 |
if $$tested{$n} |
|
109
|
0 |
0 |
if ($n =~ s/__only//) |
|
110
|
0 |
0 |
if $$tested{$n}++ |
|
116
|
0 |
0 |
if ($num) { } |
|
120
|
0 |
0 |
if ($@) |
|
132
|
0 |
0 |
$r ? : |
|
141
|
0 |
0 |
if $failures |
|
144
|
0 |
0 |
if ($total > $self->plan) { } |
|
|
0 |
0 |
elsif ($total < $self->plan) { } |
|
155
|
0 |
0 |
if $self->silently |
|
157
|
0 |
0 |
if ($self->proving) |
|
172
|
0 |
0 |
if $msg =~ /^(not )?ok/ |
|
173
|
0 |
0 |
if (defined $laststream and $laststream eq $stream) { } |
|
176
|
0 |
0 |
if ($self->proving) |
|
177
|
0 |
0 |
if ($laststream) |
|
180
|
0 |
0 |
if ($stream eq 'error') { } |
|
192
|
0 |
0 |
if ($laststream and $self->proving) |
|
207
|
0 |
0 |
if ($@) |
|
211
|
0 |
0 |
if $class->can('exceptions') |
|
213
|
0 |
0 |
$superclasses ? : |
|
219
|
0 |
0 |
if ($@) |
|
246
|
0 |
0 |
unless ($self->plan) |
|
251
|
0 |
0 |
@t ? : |
|
266
|
0 |
0 |
if ($test =~ /^\s*\$test->(?!announce)/m) { } |
|
267
|
0 |
0 |
if $$skips{$test_name} |
|
270
|
0 |
0 |
if ($test_name =~ s/__only$//) |
|
299
|
0 |
0 |
if ($data =~ /^\s*\$test->plan\(([^)]+)\);\s*\n/m) { } |
|
302
|
0 |
0 |
if ($1 =~ /,/) { } |
|
|
0 |
0 |
elsif ($1 =~ /=>/) { } |
|
309
|
0 |
0 |
if defined $plan[0] |
|
310
|
0 |
0 |
if defined $plan[1] |
|
322
|
0 |
0 |
if ($data =~ /^\s*=begin btest\(/m) { } |
|
343
|
0 |
0 |
if ($val ne "\n") |
|
357
|
0 |
0 |
$$data =~ /^\s*use\s*strict\s*;/m ? : |
|
358
|
0 |
0 |
$$data =~ /^\s*use\s*warnings\s*;/m ? : |
|
370
|
0 |
0 |
unless my $reason = shift() |
|
397
|
0 |
0 |
if ($method ne 'DESTROY') |
|
399
|
0 |
0 |
if (defined $self->singleton) { } |
|
405
|
0 |
0 |
if (my $singleton = $self->singleton) { } |