| line |
true |
false |
branch |
|
133
|
7 |
18 |
if (defined $configParam) { } |
|
134
|
0 |
7 |
if (ref $configParam ne 'HASH') |
|
148
|
20 |
5 |
unless $$self{'config'}{'defaultValueComparator'} |
|
151
|
20 |
5 |
unless $$self{'config'}{'defaultUniqueValues'} |
|
156
|
1 |
24 |
if $$self{'config'}{'caseSensitiveNames'} |
|
163
|
0 |
25 |
if $debug |
|
169
|
0 |
25 |
if $debug |
|
206
|
0 |
48 |
unless $attrib |
|
209
|
48 |
0 |
unless $$self{'config'}{'caseSensitiveNames'} |
|
211
|
0 |
48 |
if $debug |
|
217
|
1 |
47 |
unless defined $values |
|
219
|
0 |
47 |
if ref $values ne 'ARRAY' |
|
254
|
0 |
89 |
unless $attrib |
|
257
|
87 |
2 |
unless $$self{'config'}{'caseSensitiveNames'} |
|
259
|
0 |
89 |
if $debug |
|
264
|
1 |
88 |
unless defined $values |
|
266
|
0 |
88 |
if $debug |
|
267
|
0 |
88 |
if ref $values ne 'ARRAY' |
|
270
|
61 |
27 |
unless (defined $$self{'config'}{'comparator'}{$attrib}) |
|
271
|
0 |
61 |
if $debug |
|
276
|
62 |
26 |
unless (defined $$self{'config'}{'uniqueValues'}{$attrib}) |
|
277
|
0 |
62 |
if $debug |
|
311
|
0 |
43 |
unless $attrib |
|
314
|
41 |
2 |
unless $$self{'config'}{'caseSensitiveNames'} |
|
318
|
0 |
43 |
if $debug |
|
320
|
6 |
37 |
if ($comparator eq 'caseSensitive') { } |
|
|
27 |
10 |
elsif ($comparator eq 'caseInsensitive') { } |
|
|
8 |
2 |
elsif ($comparator eq 'integer') { } |
|
|
2 |
0 |
elsif (ref $comparator eq 'CODE') { } |
|
344
|
0 |
101 |
if $debug |
|
351
|
0 |
101 |
if $debug |
|
359
|
26 |
12 |
if $cmp > 0 |
|
362
|
0 |
12 |
if $cmp == 0 and $uniq |
|
393
|
0 |
97 |
unless $attrib |
|
396
|
95 |
2 |
unless $$self{'config'}{'caseSensitiveNames'} |
|
398
|
0 |
97 |
if $debug |
|
400
|
19 |
78 |
unless $valref |
|
402
|
19 |
59 |
wantarray ? : |
|
423
|
0 |
0 |
if $debug |
|
424
|
0 |
0 |
wantarray ? : |
|
452
|
0 |
4 |
unless $attrib |
|
453
|
0 |
4 |
if $debug |
|
456
|
4 |
0 |
unless $$self{'config'}{'caseSensitiveNames'} |
|
459
|
1 |
3 |
unless $list |
|
467
|
1 |
4 |
if attrCmp($self, $attrib, $suppVal, $myVal) != 0 |
|
474
|
3 |
0 |
unless $suppVal or $myVal |
|
512
|
0 |
4 |
unless $attrib |
|
514
|
0 |
4 |
if (ref $attrib eq 'HASH') |
|
521
|
4 |
0 |
unless $$self{'config'}{'caseSensitiveNames'} |
|
524
|
2 |
2 |
unless (defined $uniq) |
|
525
|
0 |
2 |
if $debug |
|
529
|
0 |
2 |
if $debug |
|
571
|
0 |
5 |
unless $attrib |
|
573
|
0 |
5 |
if (ref $attrib eq 'HASH') |
|
580
|
5 |
0 |
unless $$self{'config'}{'caseSensitiveNames'} |
|
583
|
2 |
3 |
unless (defined $comp) |
|
584
|
0 |
2 |
if $debug |
|
588
|
1 |
2 |
if (ref $comp eq 'CODE') |
|
590
|
0 |
1 |
if $debug |
|
594
|
0 |
2 |
if ("\L$comp\E" eq 'caseignore') |
|
595
|
0 |
0 |
if $debug |
|
599
|
1 |
1 |
if ("\L$comp\E" eq 'casesensitive') |
|
600
|
0 |
1 |
if $debug |
|
604
|
1 |
0 |
if ("\L$comp\E" eq 'integer') |
|
605
|
0 |
1 |
if $debug |
|
632
|
0 |
5 |
unless $map |
|
633
|
0 |
5 |
unless $map->isa('Data::Toolkit::Map') |
|
634
|
0 |
5 |
if $debug |
|
647
|
0 |
28 |
if $debug |
|
648
|
20 |
8 |
if $vals |
|
680
|
0 |
4 |
unless $attrib |
|
683
|
4 |
0 |
unless $$self{'config'}{'caseSensitiveNames'} |
|
686
|
2 |
2 |
if (defined $value) { } |
|
688
|
0 |
2 |
if $debug |
|
691
|
0 |
2 |
unless defined $allValues and defined $$allValues[0] |
|
694
|
1 |
9 |
if ($value eq $$allValues[$count]) |
|
703
|
0 |
2 |
if $debug |
|
738
|
0 |
4 |
if (ref $class) |
|
740
|
3 |
1 |
if @_ == 1 |