| line |
true |
false |
branch |
|
33
|
2 |
54 |
unless @_ |
|
36
|
25 |
29 |
unless %{"${package}::FIELDS";} |
|
44
|
6 |
48 |
if ($next > $fattr->[0] and ($$fields{$_[0]} || 0) >= $fattr->[0]) |
|
56
|
3 |
129 |
if ($fno and $fno != $next) |
|
58
|
3 |
0 |
if ($fno < $fattr->[0]) { } |
|
59
|
0 |
3 |
if ($] < 5.006001) { } |
|
60
|
0 |
0 |
if $^W |
|
69
|
36 |
96 |
$f =~ /^_/ ? : |
|
72
|
0 |
54 |
if (@$fattr > $next) |
|
92
|
0 |
0 |
if (@{"${pkg}::ISA";}) |
|
101
|
0 |
0 |
if (defined $fattr) |
|
103
|
0 |
0 |
if $fattr & 1 |
|
104
|
0 |
0 |
if $fattr & 2 |
|
105
|
0 |
0 |
if $fattr & 4 |
|
122
|
0 |
7 |
if ref $class |
|
141
|
1 |
0 |
if $] >= 5.009 |
|
144
|
0 |
0 |
if (@_) { } |
|
145
|
0 |
0 |
if (ref $_[0] eq 'ARRAY') { } |
|
148
|
0 |
0 |
if (@_) |
|
150
|
0 |
0 |
unless (not @_ and ref $v eq 'ARRAY') |
|
157
|
0 |
0 |
if (@_ % 2) |