| line |
true |
false |
branch |
|
232
|
3 |
39 |
unless (exists $$ary{'Data'}) |
|
238
|
2 |
37 |
unless (exists $$ary{'Weight'}) |
|
244
|
2 |
35 |
unless (ref $$ary{'Data'} eq 'ARRAY') |
|
250
|
2 |
33 |
unless ($$ary{'Weight'} =~ /^\d+$/) |
|
281
|
5 |
40 |
if ($$rules[$i] =~ /^\s*DEBUG\s/i) |
|
282
|
1 |
4 |
unless ($$rules[$i] =~ /^\s*DEBUG\s+(ON|OFF)\s*(.*?)\s*$/i) |
|
287
|
2 |
2 |
if $onoff eq 'ON' |
|
292
|
1 |
39 |
unless (exists $$rules[$i]{'Field'}) |
|
297
|
1 |
38 |
unless (exists $$rules[$i]{'Values'}) |
|
305
|
38 |
0 |
if (ref $$rules[$i]{'Values'} eq 'ARRAY') { } |
|
308
|
7 |
31 |
if (exists $$rules[$i]{'Retry_If'}) |
|
314
|
13 |
25 |
if (ref $$rules[$i]{'Values'}[0] eq '') { } |
|
|
25 |
0 |
elsif (ref $$rules[$i]{'Values'}[0] eq 'HASH') { } |
|
316
|
1 |
12 |
if (exists $$rules[$i]{'Retry_If'}) |
|
325
|
1 |
12 |
if (exists $$rules[$i]{'Retry_If'}) { } |
|
336
|
18 |
7 |
if (exists $$rules[$i]{'Values'}[0]{'Alternatives'}) { } |
|
352
|
1 |
37 |
unless (exists $$hash{'Precondition'}) |
|
358
|
0 |
37 |
unless (exists $$hash{'Alternatives'}) |
|
365
|
17 |
20 |
if ($condition eq 'DEFAULT') { } |
|
366
|
10 |
7 |
if ($branchno > 1) { } |
|
377
|
0 |
20 |
if ($done) |
|
384
|
10 |
10 |
if $branchno > 1 |
|
392
|
12 |
25 |
if (exists $$hash{'Retry_If'}) |
|
399
|
24 |
13 |
if (exists $$hash{'Retry_If'} or exists $$rules[$i]{'Retry_If'}) |
|
401
|
12 |
12 |
if exists $$hash{'Retry_If'} |
|
402
|
15 |
9 |
if exists $$rules[$i]{'Retry_If'} |
|
412
|
21 |
16 |
if (ref $$hash{'Alternatives'}[0] eq '') { } |
|
|
16 |
0 |
elsif (ref $$hash{'Alternatives'}[0] eq 'HASH') { } |
|
417
|
4 |
12 |
unless $temp_code = _process_alternatives($fieldname, $j, $$hash{'Alternatives'}) |
|
430
|
20 |
13 |
if (exists $$hash{'Retry_If'} or exists $$rules[$i]{'Retry_If'}) { } |
|
451
|
1 |
6 |
if (exists $$rules[$i]{'Retry_If'}) |
|
462
|
1 |
1 |
if (exists $$rules[$i]{'Retry_If'}) { } |
|
488
|
2 |
15 |
if ($print_filename) |
|
489
|
2 |
0 |
if (open CODE, ">$print_filename") { } |
|
499
|
0 |
17 |
unless (defined $retval) |
|
535
|
4 |
28 |
if ($$rules[$i] =~ /^\s*DEBUG\s/i) |
|
536
|
0 |
4 |
unless ($$rules[$i] =~ /^\s*DEBUG\s+(ON|OFF)\s*(.*?)\s*$/i) |
|
541
|
2 |
2 |
if $onoff eq 'ON' |
|
546
|
0 |
28 |
unless (exists $$rules[$i]{'Field'}) |
|
551
|
0 |
28 |
unless (exists $$rules[$i]{'Values'}) |
|
559
|
28 |
0 |
if (ref $$rules[$i]{'Values'} eq 'ARRAY') { } |
|
562
|
7 |
21 |
if (exists $$rules[$i]{'Retry_If'}) |
|
576
|
13 |
15 |
if (ref $$rules[$i]{'Values'}[0] eq '') { } |
|
|
15 |
0 |
elsif (ref $$rules[$i]{'Values'}[0] eq 'HASH') { } |
|
593
|
13 |
2 |
if (exists $$rules[$i]{'Values'}[0]{'Alternatives'}) { } |
|
612
|
0 |
33 |
unless (exists $$hash{'Precondition'}) |
|
618
|
0 |
33 |
unless (exists $$hash{'Alternatives'}) |
|
625
|
13 |
20 |
if ($condition eq 'DEFAULT') { } |
|
626
|
10 |
3 |
if ($branchno > 1) { } |
|
637
|
0 |
20 |
if ($done) |
|
650
|
8 |
25 |
if (exists $$hash{'Retry_If'}) |
|
666
|
21 |
12 |
if (ref $$hash{'Alternatives'}[0] eq '') { } |
|
|
12 |
0 |
elsif (ref $$hash{'Alternatives'}[0] eq 'HASH') { } |
|
751
|
2 |
15 |
if ($print_filename) |
|
752
|
2 |
0 |
if (open CODE, ">>$print_filename") { } |
|
762
|
0 |
17 |
unless (defined $retval) |
|
796
|
0 |
30 |
unless $class |
|
797
|
0 |
30 |
unless $rules |
|
798
|
0 |
30 |
unless ref $rules eq 'ARRAY' |
|
803
|
13 |
17 |
unless $$self{'Generate'} = _create_generate_method($rules) |
|
805
|
0 |
17 |
unless $$self{'Permutations_and_Generate_All'} = _create_permutations_generateall_method($rules) |