| line |
true |
false |
branch |
|
62
|
138 |
10 |
if ($inputs == 5) { } |
|
|
9 |
1 |
elsif ($inputs == 2) { } |
|
83
|
132 |
9 |
if ($inputs == 5) { } |
|
94
|
1813 |
416 |
unless ($reserved{$rec}) |
|
98
|
3 |
13141 |
unless defined $el |
|
100
|
3 |
1810 |
if $undefcount |
|
103
|
1 |
136 |
unless $datapoints |
|
105
|
1 |
136 |
if @defective_records |
|
129
|
1 |
954 |
$seen{$field} ? : |
|
141
|
2 |
949 |
unless $temp[0] =~ /^\d+$/ and $temp[1] =~ /^[UD]$/i and $temp[2] =~ /^[ans]$/i |
|
149
|
3 |
134 |
if $badvalues |
|
155
|
1 |
133 |
unless $index =~ /^\d+$/ |
|
157
|
1 |
132 |
unless $index <= $#fields |
|
193
|
724 |
368 |
unless $reserved{$_} |
|
195
|
121 |
1 |
$count ? : |
|
203
|
947 |
619 |
unless $reserved{$_} |
|
213
|
167 |
37 |
unless $reserved{$_} |
|
233
|
588 |
118 |
unless $reserved{$k} |
|
253
|
1 |
37 |
unless ($cols{$fields[$index]}) |
|
265
|
2307 |
506 |
if $result |
|
308
|
12 |
15 |
unless @_ == 1 |
|
314
|
161 |
34 |
unless ($reserved{$_}) |
|
327
|
229 |
884 |
if ($col eq $field) |
|
332
|
6 |
229 |
unless $seen{$col} |
|
335
|
5 |
58 |
if @unseen |
|
358
|
1 |
105 |
unless $all_relations{$relation_raw} |
|
361
|
0 |
105 |
unless $type |
|
371
|
81 |
10 |
unless exists ${$seenref;}{$item} |
|
373
|
72 |
16 |
unless exists ${$seenref;}{$item} |
|
375
|
98 |
111 |
unless not exists ${$seenref;}{$item} |
|
377
|
126 |
72 |
unless not exists ${$seenref;}{$item} |
|
379
|
35 |
20 |
unless $item lt ${$correctedref;}[0] |
|
381
|
40 |
15 |
unless $item < ${$correctedref;}[0] |
|
383
|
35 |
20 |
unless $item gt ${$correctedref;}[0] |
|
385
|
40 |
15 |
unless $item > ${$correctedref;}[0] |
|
387
|
36 |
30 |
unless $item le ${$correctedref;}[0] |
|
389
|
42 |
24 |
unless $item <= ${$correctedref;}[0] |
|
391
|
31 |
54 |
unless $item ge ${$correctedref;}[0] |
|
393
|
82 |
31 |
unless $item >= ${$correctedref;}[0] |
|
400
|
1136 |
312 |
unless ($reserved{$record}) |
|
426
|
0 |
9 |
unless open $OUT, ">$outputfile" |
|
429
|
0 |
9 |
unless close $OUT |
|
440
|
126 |
48 |
unless ($reserved{$i}) |
|
450
|
0 |
5 |
unless open my $OUT, ">$outputfile" |
|
453
|
47 |
15 |
unless ($reserved{$i}) |
|
456
|
401 |
47 |
if ($j < scalar(@fields) - 1) { } |
|
457
|
325 |
76 |
if ($fields[$j]) { } |
|
463
|
37 |
10 |
if $fields[$j] |
|
469
|
0 |
5 |
unless close $OUT |
|
480
|
0 |
5 |
unless open my $OUT, ">$outputfile" |
|
483
|
47 |
15 |
unless ($reserved{$i}) |
|
492
|
0 |
5 |
unless close $OUT |
|
525
|
1 |
67 |
if @incoming % 2 |
|
528
|
8 |
59 |
unless is_LsubsetR([$keys_needed_to_write{$callingsub}, [keys %args]]) |
|
540
|
0 |
10 |
unless open my $REPORT, ">$args{'file'}" |
|
546
|
0 |
10 |
unless close $REPORT |
|
558
|
0 |
10 |
unless open my $REPORT, ">$args{'file'}" |
|
567
|
0 |
10 |
unless close $REPORT |
|
579
|
0 |
1 |
unless open my $REPORT, ">$args{'file'}" |
|
590
|
0 |
1 |
unless close $REPORT |
|
619
|
0 |
1 |
unless open my $REPORT, ">$args{'file'}" |
|
621
|
0 |
1 |
unless close $REPORT |
|
645
|
1 |
4 |
unless is_LsubsetR([\@fields_for_reprocessing, \@confirmed_subs]) |
|
654
|
1 |
3 |
unless is_LsubsetR([\@fields_for_reprocessing, \@available_sources]) |
|
664
|
1 |
5 |
unless $reprocessing_info{$_} =~ /^\d+$/ |
|
683
|
2 |
2 |
if ($args_indices{$_} == 0) { } |
|
711
|
0 |
10 |
unless open my $REPORT, ">$args{'file'}" |
|
715
|
0 |
10 |
unless close $REPORT |
|
724
|
0 |
10 |
unless open my $REPORT, ">$args{'file'}" |
|
729
|
0 |
10 |
unless close $REPORT |
|
750
|
0 |
1 |
unless open my $OUT, ">$args{'file'}" |
|
755
|
0 |
1 |
unless close $OUT |
|
779
|
0 |
1 |
unless open my $OUT, ">$args{'file'}" |
|
785
|
0 |
1 |
unless close $OUT |
|
807
|
1 |
3 |
unless is_LsubsetR([$reprocessref, \@confirmed_subs]) |
|
815
|
1 |
2 |
unless is_LsubsetR([$reprocessref, \@available_sources]) |
|
830
|
1 |
19 |
if $_[0] |
|
839
|
2 |
120 |
defined ${$reprocessref;}{$args[$j]} ? : |
|
847
|
4 |
226 |
if length $word > $max |
|
851
|
122 |
23 |
if (length $remain <= $max) { } |
|
875
|
2 |
236 |
defined ${$reprocessref;}{$args[$j]} ? : |
|
877
|
93 |
145 |
unless (${$p;}[$j]) |
|
899
|
1 |
19 |
if $_[0] |
|
904
|
2 |
120 |
defined ${$reprocessref;}{$h} ? : |
|
917
|
48 |
86 |
if ($fp{$h}[2] =~ /^n$/i) { } |
|
922
|
112 |
22 |
if ($g < $#{$columns_selected_ref;}) { } |
|
944
|
1 |
9 |
unless $args{'file'} =~ /\.html?$/ |
|
946
|
0 |
9 |
unless open my $HTML, ">$args{'file'}" |
|
974
|
132 |
274 |
if ($fp{${$args{'columns'};}[$j]}[2] =~ /^n$/i) { } |
|
993
|
0 |
9 |
unless close $HTML |