| line |
true |
false |
branch |
|
13
|
1 |
541 |
unless ref $basis eq "Graphics::Toolkit::Color::Space::Basis" |
|
17
|
522 |
19 |
unless defined $value_form |
|
18
|
523 |
18 |
if ref $value_form ne "ARRAY" |
|
19
|
0 |
541 |
if ref $value_form ne "ARRAY" |
|
20
|
1646 |
0 |
defined $_ && $_ ? : |
|
21
|
1 |
540 |
unless @$value_form == $count |
|
24
|
1 |
539 |
unless ref $suffix |
|
28
|
213 |
2147 |
if $_[0]->basis->is_value_tuple($_[1]) |
|
53
|
488 |
556 |
unless defined $suffix |
|
54
|
9 |
1035 |
unless ref $suffix |
|
55
|
1 |
1043 |
unless ref $suffix eq "ARRAY" |
|
56
|
3 |
1040 |
unless @$suffix == $count |
|
61
|
2484 |
504 |
unless defined $suffix |
|
67
|
0 |
17 |
if not defined $format or ref $format or ref $code ne "CODE" |
|
68
|
0 |
17 |
if $self->has_formatter($format) |
|
73
|
0 |
17 |
if not defined $format or ref $format or ref $code ne "CODE" |
|
74
|
0 |
17 |
if $self->has_deformatter($format) |
|
79
|
0 |
16 |
if ref $pre_code ne "CODE" or ref $post_code ne "CODE" |
|
86
|
139 |
30 |
defined $_[1] && exists $_[0]{'formatter'}{lc $_[1]} ? : |
|
87
|
1 |
18 |
defined $_[1] && exists $_[0]{'deformatter'}{lc $_[1]} ? : |
|
91
|
0 |
2360 |
unless defined $color_def |
|
93
|
0 |
2360 |
unless ref $suffix |
|
97
|
13416 |
361 |
unless ref $tuple |
|
100
|
187 |
174 |
unless $self->are_tuple_numbers_well_formatted($tuple) |
|
102
|
0 |
174 |
unless $self->basis->is_number_tuple($tuple) |
|
103
|
145 |
29 |
wantarray ? : |
|
109
|
0 |
144 |
unless $self->basis->is_value_tuple($tuple) |
|
110
|
9 |
135 |
unless $self->has_formatter($format) |
|
112
|
3 |
132 |
unless ref $suffix |
|
121
|
1 |
360 |
unless $self->basis->is_value_tuple($dirty_tuple) |
|
129
|
1 |
361 |
unless $self->basis->is_value_tuple($tuple) |
|
131
|
0 |
361 |
unless ref $suffix |
|
134
|
982 |
127 |
unless $suffix->[$axis_index] |
|
137
|
66 |
61 |
if substr($tuple->[$axis_index], -$suf_length) eq $suffix->[$axis_index] and substr($tuple->[$axis_index], -($suf_length + 1), 1) ne " " |
|
145
|
0 |
132 |
unless $self->basis->is_value_tuple($tuple) |
|
147
|
0 |
132 |
unless ref $suffix |
|
150
|
379 |
23 |
unless $suffix->[$axis_index] |
|
153
|
23 |
0 |
if substr($tuple->[$axis_index], -$suf_length) ne $suffix->[$axis_index] |
|
162
|
165 |
9 |
unless ref $self->{'value_numifier'}{'into_numeric'} |
|
164
|
9 |
0 |
if $self->basis->is_value_tuple($tuple) |
|
168
|
128 |
4 |
unless ref $self->{'value_numifier'}{'from_numeric'} |
|
170
|
4 |
0 |
if $self->basis->is_value_tuple($tuple) |
|
175
|
1 |
360 |
if ref $tuple ne "ARRAY" |
|
176
|
0 |
360 |
if @$tuple != $self->basis->axis_count |
|
179
|
186 |
631 |
unless $tuple->[$axis_index] =~ /^$re[$axis_index]$/u |
|
193
|
1602 |
612 |
unless defined $string and not ref $string |
|
197
|
582 |
30 |
unless $self->{'basis'}->is_name($space_name) and $tuple_string |
|
200
|
29 |
1 |
if index($tuple_string, ",") != -1 |
|
205
|
1681 |
642 |
unless defined $string and not ref $string |
|
209
|
623 |
19 |
unless $self->{'basis'}->is_name($space_name) and $tuple_string |
|
212
|
17 |
2 |
if index($tuple_string, ",") != -1 |
|
217
|
1077 |
1184 |
if ref $array ne "ARRAY" or not @$array |
|
218
|
1132 |
52 |
unless $self->basis->is_name($array->[0]) |
|
220
|
5 |
47 |
if @$array == 1 and ref $array->[0] eq "ARRAY" |
|
221
|
5 |
47 |
unless @$array == $self->basis->axis_count |
|
226
|
1718 |
469 |
if ref $array ne "ARRAY" or @$array != 2 |
|
227
|
469 |
0 |
unless $self->basis->is_name($array->[0]) |
|
229
|
0 |
0 |
if ref $array ne "ARRAY" or @$array != $self->basis->axis_count |
|
234
|
2270 |
37 |
unless $self->basis->is_hash($hash) |