| line |
true |
false |
branch |
|
35
|
2 |
54 |
unless @_ |
|
38
|
25 |
29 |
unless %{"${package}::FIELDS";} |
|
46
|
6 |
48 |
if ($next > $fattr->[0] and ($$fields{$_[0]} || 0) >= $fattr->[0]) |
|
58
|
3 |
129 |
if ($fno and $fno != $next) |
|
60
|
3 |
0 |
if ($fno < $fattr->[0]) { } |
|
61
|
0 |
3 |
if ($] < 5.006001) { } |
|
62
|
0 |
0 |
if $^W |
|
71
|
36 |
96 |
$f =~ /^_/ ? : |
|
74
|
0 |
54 |
if (@$fattr > $next) |
|
94
|
0 |
0 |
if (@{"${pkg}::ISA";}) |
|
103
|
0 |
0 |
if (defined $fattr) |
|
105
|
0 |
0 |
if $fattr & 1 |
|
106
|
0 |
0 |
if $fattr & 2 |
|
107
|
0 |
0 |
if $fattr & 4 |
|
124
|
0 |
7 |
if ref $class |
|
143
|
1 |
0 |
if $] >= 5.009 |
|
146
|
0 |
0 |
if (@_) { } |
|
147
|
0 |
0 |
if (ref $_[0] eq 'ARRAY') { } |
|
150
|
0 |
0 |
if (@_) |
|
152
|
0 |
0 |
unless (not @_ and ref $v eq 'ARRAY') |
|
159
|
0 |
0 |
if (@_ % 2) |