| line |
true |
false |
branch |
|
11
|
3 |
286 |
unless ref $axis_long_names eq "ARRAY" |
|
12
|
1 |
34 |
if defined $axis_short_names and ref $axis_short_names ne 'ARRAY' || @$axis_long_names != @$axis_short_names |
|
16
|
34 |
251 |
defined $axis_short_names ? : |
|
17
|
0 |
285 |
unless @axis_long_name > 0 |
|
18
|
0 |
285 |
unless @axis_long_name == @axis_short_name |
|
32
|
882 |
0 |
if defined $_[0] |
|
43
|
600 |
0 |
defined $_[1] ? : |
|
44
|
337 |
0 |
defined $_[1] ? : |
|
48
|
0 |
324 |
unless defined $_[1] |
|
49
|
52 |
272 |
if uc $_[1] eq $_[0]{'space_name'} |
|
50
|
16 |
256 |
if $_[0]{'alias_name'} and uc $_[1] eq $_[0]{'alias_name'} |
|
53
|
352 |
898 |
defined $_[1] && exists $_[0]{'long_name_order'}{lc $_[1]} ? : |
|
54
|
334 |
569 |
defined $_[1] && exists $_[0]{'short_name_order'}{lc $_[1]} ? : |
|
55
|
816 |
262 |
unless $_[0]->is_long_axis_name($_[1]) |
|
58
|
87 |
2054 |
if $self->is_partial_hash($value_hash) |
|
62
|
1556 |
872 |
unless ref $value_hash eq "HASH" |
|
65
|
149 |
723 |
unless $key_count and $key_count <= $self->axis_count |
|
67
|
564 |
506 |
unless $self->is_axis_name($axis_name) |
|
69
|
249 |
257 |
unless defined $axis_pos |
|
71
|
9 |
497 |
if $axis_visited[$axis_pos] > 1 |
|
75
|
4460 |
74 |
ref $_[1] eq 'ARRAY' && @{$_[1];} == $_[0]->axis_count ? : |
|
78
|
5 |
354 |
unless $self->is_value_tuple($tuple) |
|
79
|
4 |
1063 |
unless is_nr($tuple->[$_]) |
|
86
|
1 |
3 |
unless $self->is_long_axis_name($name) |
|
91
|
1 |
3 |
unless $self->is_short_axis_name($name) |
|
97
|
2 |
11 |
unless $self->is_value_tuple($values) |
|
102
|
2 |
8 |
unless $self->is_value_tuple($values) |
|
108
|
1 |
39 |
unless $self->is_hash($value_hash) |
|
111
|
59 |
63 |
if ($self->is_long_axis_name($key)) { } |
|
|
63 |
0 |
elsif ($self->is_short_axis_name($key)) { } |
|
119
|
204 |
27 |
unless $self->is_partial_hash($value_hash) |
|
122
|
26 |
16 |
if ($self->is_long_axis_name($key)) { } |
|
|
16 |
0 |
elsif ($self->is_short_axis_name($key)) { } |
|
131
|
2 |
29 |
unless $self->is_value_tuple($values) |
|
132
|
14 |
15 |
if exists $self->{'long_name_order'}{$name} |
|
133
|
13 |
2 |
if exists $self->{'short_name_order'}{$name} |