| line |
true |
false |
branch |
|
144
|
0 |
9 |
3 == @_ ? : |
|
158
|
15 |
39 |
if (defined $spec) |
|
160
|
3 |
12 |
if ('ARRAY' eq ref $spec) { } |
|
|
5 |
7 |
elsif ('REF' eq ref $spec) { } |
|
161
|
0 |
3 |
unless @$spec |
|
165
|
0 |
6 |
if ('endian' eq $field and 'native' eq $_) |
|
169
|
0 |
6 |
unless ($valid{$field}) |
|
179
|
0 |
5 |
unless 'ARRAY' eq ref $$spec |
|
180
|
0 |
5 |
unless 1 == @$$spec |
|
189
|
0 |
15 |
if ('endian' eq $field and 'native' eq $spec) |
|
193
|
0 |
15 |
unless ($spec =~ /$valid{$field}/) |
|
201
|
0 |
9 |
if (keys %args) |
|
234
|
79 |
80 |
unless defined $provided |
|
236
|
0 |
80 |
unless ($provided =~ /$valid{$field}/) |
|
240
|
33 |
47 |
if (defined $wanted) { } |
|
|
4 |
43 |
elsif ('endian' eq $field) { } |
|
243
|
9 |
24 |
if 'ARRAY' eq ref $this->required->{$field} |
|
245
|
17 |
16 |
if (any sub {
_equal($_, $provided);
}
, @wanted) { } |
|
255
|
10 |
6 |
if $this->required->{$field} |
|
268
|
0 |
4 |
if ($provided ne $localendian) |
|
274
|
0 |
19 |
if ($ENV{'DEBUG'}) |
|
281
|
1 |
9 |
unless keys %scores |
|
286
|
8 |
1 |
unless wantarray |
|
303
|
37 |
4 |
if ($x =~ /$number_re/ and $y =~ /$number_re/) { } |
|
324
|
0 |
0 |
if (@_ != 1) |
|
329
|
0 |
0 |
if (defined $other->$field) |
|
355
|
0 |
0 |
if (@_ > 1) |
|
359
|
0 |
0 |
unless ref $other |
|
362
|
0 |
0 |
unless $this->required->{$field} |
|
363
|
0 |
0 |
unless defined $other->$field |
|
366
|
0 |
0 |
if 'ARRAY' eq ref $this->required->{$field} |
|
368
|
0 |
0 |
unless any sub {
_equal($other->$field, $_);
}
, @required |