| line |
true |
false |
branch |
|
144
|
3 |
0 |
if ($my_name) |
|
161
|
0 |
0 |
if ($testname) |
|
172
|
0 |
0 |
if ($version) |
|
183
|
0 |
0 |
if ($units) |
|
204
|
0 |
0 |
unless ($$self{$field}) |
|
211
|
0 |
0 |
if ($$self{$field}) |
|
213
|
0 |
0 |
if ($field eq 'build' and $$self{'build_status'}) { } |
|
221
|
0 |
0 |
if ($$self{'test'}) |
|
223
|
0 |
0 |
if ($$self{'test'}{'log-filename'}) |
|
226
|
0 |
0 |
if ($$self{'test'}{'path'}) |
|
229
|
0 |
0 |
if ($$self{'test'}{'suite-type'}) { } |
|
235
|
0 |
0 |
if ($$self{'test'}{'data'}) |
|
237
|
0 |
0 |
if ($$self{'test'}{'data'}{'columns'}) |
|
242
|
0 |
0 |
if ($column_hash{$column_key}{'name'}) |
|
245
|
0 |
0 |
if ($column_hash{$column_key}{'units'}) |
|
252
|
0 |
0 |
if ($$self{'test'}{'data'}{'datum'}) |
|
257
|
0 |
0 |
if ($key_val) |
|
259
|
0 |
0 |
if ($$self{'test'}{'data'}{'datum'}{$datum_key}{$key_val}) |
|
305
|
0 |
0 |
if (defined $$self{'num-datum'}) |
|
323
|
0 |
0 |
if (defined $$self{'num-datum'}) { } |
|
353
|
0 |
0 |
if (@_) |
|
361
|
0 |
0 |
if (@_) |
|
369
|
0 |
0 |
if (@_) |
|
376
|
0 |
0 |
if (@_) |
|
384
|
0 |
0 |
if (@_) |
|
392
|
0 |
0 |
if (@_) |
|
400
|
0 |
0 |
if (@_) |
|
408
|
0 |
0 |
if (@_) |
|
416
|
0 |
0 |
if (@_) |
|
424
|
0 |
0 |
if (@_) |
|
432
|
3 |
0 |
if (@_) |
|
441
|
0 |
0 |
if (@_) |
|
457
|
0 |
0 |
if (@_) |
|
465
|
0 |
0 |
if (@_) |
|
473
|
0 |
1 |
if (@_) |
|
487
|
0 |
1 |
if (@_) |
|
501
|
0 |
3 |
if (@_) |
|
530
|
0 |
0 |
if (@_) |
|
538
|
0 |
0 |
if (@_) |
|
554
|
0 |
0 |
unless my $key = shift() |
|
555
|
0 |
0 |
unless my $datum_id = shift() |
|
562
|
0 |
0 |
if ($$self{'test'}{'data'}{'columns'}{$id}{'name'} eq $key) |
|
567
|
0 |
0 |
if (defined $col_id) { } |
|
620
|
0 |
4 |
unless my $input = shift() |
|
626
|
0 |
4 |
if (ref $input eq 'GLOB') { } |
|
|
0 |
4 |
elsif (not ref $input and $input =~ /\n/) { } |
|
|
4 |
0 |
elsif (not ref $input and -f $input) { } |
|
629
|
0 |
0 |
if $retval == 100 |
|
637
|
0 |
0 |
if $retval == 100 |
|
646
|
0 |
4 |
unless open FILE, "< $input" |
|
651
|
0 |
5134 |
if $retval eq 100 |
|
675
|
0 |
0 |
unless my $text = shift() |