| line |
true |
false |
branch |
|
10
|
3 |
69 |
unless ref $axis_names eq "ARRAY" |
|
11
|
0 |
9 |
if defined $name_shortcuts and ref $name_shortcuts ne 'ARRAY' || @$axis_names != @$name_shortcuts |
|
13
|
9 |
60 |
defined $name_shortcuts ? : |
|
14
|
0 |
69 |
unless @keys > 0 |
|
30
|
83 |
0 |
defined $_[1] ? : |
|
31
|
182 |
0 |
defined $_[1] ? : |
|
32
|
96 |
417 |
defined $_[1] && exists $_[0]{'key_order'}{lc $_[1]} ? : |
|
33
|
214 |
133 |
defined $_[1] && exists $_[0]{'shortcut_order'}{lc $_[1]} ? : |
|
34
|
188 |
26 |
unless $_[0]->is_key($_[1]) |
|
37
|
491 |
90 |
unless defined $string and not ref $string |
|
40
|
53 |
37 |
unless index($string, $name . ":") == 0 |
|
43
|
37 |
0 |
$string =~ /^$name:$nrs$/u ? : |
|
47
|
479 |
79 |
unless defined $string and not ref $string |
|
50
|
77 |
2 |
unless index($string, $name . "(") == 0 |
|
53
|
2 |
0 |
$string =~ /^$name\($nrs\)$/u ? : |
|
57
|
2729 |
201 |
ref $value_array eq 'ARRAY' && @$value_array == $self->{'count'} ? : |
|
61
|
96 |
533 |
ref $value_array eq 'ARRAY' && @$value_array == $self->{'count'} + 1 && uc $value_array->[0] eq uc $self->name ? : |
|
66
|
448 |
116 |
unless ref $value_hash eq "HASH" and CORE::keys %$value_hash == $self->{'count'} |
|
68
|
78 |
121 |
unless $self->is_key_or_shortcut($_) |
|
74
|
1 |
6 |
unless ref $value_hash eq "HASH" |
|
76
|
1 |
5 |
unless $key_count and $key_count <= $self->{'count'} |
|
78
|
1 |
10 |
unless $self->is_key_or_shortcut($_) |
|
87
|
0 |
18 |
unless $self->is_key($key) |
|
94
|
2 |
4 |
unless @values == $self->{'count'} |
|
95
|
1 |
3 |
unless exists $self->{'key_order'}{$key} |
|
102
|
0 |
4 |
unless @values == $self->{'count'} |
|
103
|
1 |
3 |
unless exists $self->{'shortcut_order'}{$shortcut} |
|
109
|
0 |
36 |
unless ref $value_hash eq "HASH" and CORE::keys %$value_hash == $self->{'count'} |
|
112
|
16 |
96 |
if ($self->is_key($value_key)) { } |
|
|
95 |
1 |
elsif ($self->is_shortcut($value_key)) { } |
|
121
|
1 |
78 |
unless ref $value_hash eq "HASH" |
|
123
|
10 |
68 |
unless @keys_got and @keys_got <= $self->{'count'} |
|
126
|
16 |
59 |
if ($self->is_key($key)) { } |
|
|
10 |
49 |
elsif ($self->is_shortcut($key)) { } |
|
148
|
2 |
19 |
unless @values == $self->{'count'} |
|
154
|
2 |
6 |
unless @values == $self->{'count'} |
|
160
|
1 |
0 |
if @values == $self->{'count'} |
|
165
|
0 |
38 |
unless @values == $self->{'count'} |
|
171
|
0 |
2 |
unless @values == $self->{'count'} |
|
175
|
216 |
0 |
if defined $_[0] |