| line |
true |
false |
branch |
|
17
|
0 |
68 |
if ref $class |
|
18
|
1 |
67 |
if @_ % 2 |
|
26
|
1 |
66 |
if %args |
|
27
|
1 |
65 |
if ref $inc |
|
28
|
1 |
64 |
if ref $noinc |
|
31
|
1 |
63 |
if $inc eq $noinc |
|
32
|
2 |
61 |
if $inc eq "|" or $noinc eq "|" |
|
36
|
48 |
13 |
if (defined $set) { } |
|
38
|
1 |
47 |
if ref $set ne "ARRAY" |
|
41
|
21 |
131 |
if (ref $e) { } |
|
42
|
1 |
20 |
if ref $e ne "ARRAY" |
|
43
|
1 |
19 |
if $eqs |
|
44
|
2 |
17 |
unless @{$e;} |
|
46
|
3 |
32 |
if ref $sub_e or not defined $sub_e |
|
48
|
4 |
28 |
if exists $seen{$sub_e} |
|
52
|
1 |
130 |
unless defined $e |
|
53
|
1 |
129 |
if exists $seen{$e} |
|
60
|
1 |
12 |
if defined $eqs |
|
63
|
13 |
33 |
if (defined $elem_ids) |
|
64
|
3 |
10 |
unless defined $ext and defined $set |
|
66
|
1 |
9 |
if ref $elem_ids ne "HASH" |
|
71
|
12 |
30 |
if ($ext) { } |
|
|
21 |
9 |
elsif (ref $set) { } |
|
72
|
11 |
1 |
if ($set) { } |
|
74
|
1 |
41 |
if ref $e |
|
76
|
8 |
2 |
if ($elem_ids) { } |
|
77
|
1 |
7 |
if keys %$elem_ids != @$set |
|
80
|
2 |
22 |
unless defined $e_id |
|
81
|
3 |
19 |
if not $e_id =~ /^\d$/ && defined $set->[$e_id] or $set->[$e_id] ne $e |
|
100
|
5 |
70 |
if (ref $entry) { } |
|
108
|
2 |
3 |
if @$entry > 1 |
|
114
|
0 |
21 |
if defined $eqs and @eqs_tmp |
|
115
|
1 |
20 |
if @eqs_tmp |
|
118
|
14 |
20 |
if (defined $eqs) |
|
119
|
1 |
13 |
if ref $eqs ne "ARRAY" |
|
123
|
1 |
27 |
if ref $eqArray ne "ARRAY" |
|
124
|
2 |
25 |
unless @{$eqArray;} |
|
126
|
1 |
56 |
if ref $entry |
|
127
|
1 |
55 |
unless defined $entry |
|
128
|
2 |
53 |
unless exists $elem_ids->{$entry} |
|
129
|
2 |
51 |
if exists $seen{$entry} |
|
132
|
5 |
14 |
if @{$eqArray;} == 1 |
|
173
|
2 |
7 |
if @$arr1 != @$arr2 |
|
175
|
1 |
35 |
if $arr1->[$i] != $arr2->[$i] |
|
185
|
9 |
58 |
if ($pedantic) |
|
186
|
1 |
8 |
unless substr($header, -1, 1) eq "|" |
|
188
|
1 |
65 |
unless $header =~ s/^\s*\|.*?\|\s*// |
|
189
|
2 |
63 |
$header eq '|' ? : |
|
190
|
2 |
63 |
if $header eq "" |
|
194
|
2 |
181 |
if exists $elem_ids{$name} |
|
341
|
1 |
78 |
if @_ % 2 |
|
345
|
1 |
77 |
unless @_ |
|
347
|
2 |
74 |
if %args |
|
349
|
39 |
35 |
if (ref $src) { } |
|
|
4 |
31 |
elsif (not $src =~ /\n/) { } |
|
350
|
1 |
38 |
if ref $src ne "ARRAY" |
|
352
|
1 |
169 |
if ref $e or not defined $e |
|
362
|
33 |
39 |
unless $self->{'prespec'} |
|
364
|
20 |
23 |
wantarray ? : |
|
368
|
1 |
2 |
if @_ > 1 |
|
369
|
1 |
2 |
if @_ > 1 |
|
370
|
1 |
11 |
if @_ > 1 |
|
371
|
1 |
31 |
if @_ > 1 |
|
372
|
1 |
39 |
if @_ > 1 |
|
373
|
0 |
29 |
if @_ > 1 |
|
374
|
0 |
19 |
if @_ > 1 |
|
379
|
1 |
25 |
if @_ % 2 |
|
382
|
1 |
24 |
if %args |
|
383
|
2 |
22 |
unless $self->{'matrix'} |
|
384
|
1 |
21 |
if $bless |
|
391
|
1 |
10 |
if @_ % 2 |
|
394
|
1 |
9 |
if %args |
|
397
|
2 |
7 |
unless $matrix |
|
399
|
2 |
5 |
if $bless |