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) |