| line |
true |
false |
branch |
|
14
|
1 |
283 |
unless ref $basis eq "Graphics::Toolkit::Color::Space::Basis" |
|
18
|
265 |
18 |
unless defined $value_form |
|
19
|
266 |
17 |
unless ref $value_form |
|
20
|
0 |
283 |
if ref $value_form ne "ARRAY" |
|
21
|
871 |
0 |
defined $_ && $_ ? : |
|
22
|
1 |
282 |
unless @$value_form == $count |
|
25
|
1 |
281 |
unless ref $suffix |
|
50
|
233 |
287 |
unless defined $suffix |
|
51
|
10 |
510 |
unless ref $suffix |
|
52
|
1 |
519 |
unless ref $suffix eq "ARRAY" |
|
53
|
3 |
516 |
unless @$suffix == $count |
|
59
|
0 |
31 |
if not defined $format or ref $format or ref $code ne "CODE" |
|
60
|
0 |
31 |
if $self->has_formatter($format) |
|
65
|
0 |
31 |
if not defined $format or ref $format or ref $code ne "CODE" |
|
66
|
0 |
31 |
if $self->has_deformatter($format) |
|
71
|
0 |
15 |
if ref $pre_code ne "CODE" or ref $post_code ne "CODE" |
|
78
|
116 |
47 |
defined $_[1] && exists $_[0]{'formatter'}{lc $_[1]} ? : |
|
79
|
1 |
32 |
defined $_[1] && exists $_[0]{'deformatter'}{lc $_[1]} ? : |
|
82
|
2216 |
238 |
unless defined $suffix |
|
88
|
0 |
2116 |
unless defined $color |
|
90
|
0 |
2116 |
unless ref $suffix |
|
94
|
8246 |
176 |
unless ref $values |
|
96
|
60 |
116 |
unless ref $values |
|
98
|
0 |
116 |
unless ref $values |
|
99
|
94 |
22 |
wantarray ? : |
|
105
|
0 |
124 |
unless $self->basis->is_value_tuple($values) |
|
106
|
12 |
112 |
unless $self->has_formatter($format) |
|
108
|
3 |
109 |
unless ref $suffix |
|
116
|
0 |
117 |
unless $self->basis->is_value_tuple($values) |
|
118
|
0 |
117 |
unless ref $suffix |
|
120
|
9 |
108 |
if (ref $self->{'value_numifier'}{'into_numric'}) |
|
122
|
0 |
9 |
unless $self->basis->is_value_tuple($values) |
|
127
|
281 |
76 |
unless $suffix->[$axis_index] |
|
130
|
47 |
29 |
if substr($values->[$axis_index], -$suf_length) eq $suffix->[$axis_index] and substr($values->[$axis_index], -($suf_length + 1), 1) ne " " |
|
138
|
0 |
109 |
unless $self->basis->is_value_tuple($values) |
|
140
|
0 |
109 |
unless ref $suffix |
|
142
|
4 |
105 |
if (ref $self->{'value_numifier'}{'from_numeric'}) |
|
144
|
0 |
4 |
unless $self->basis->is_value_tuple($values) |
|
149
|
308 |
25 |
unless $suffix->[$axis_index] |
|
152
|
25 |
0 |
if substr($values->[$axis_index], -$suf_length) ne $suffix->[$axis_index] |
|
160
|
18 |
158 |
if ref $values ne "ARRAY" |
|
161
|
20 |
138 |
if @$values != $self->basis->axis_count |
|
164
|
22 |
367 |
unless $values->[$axis_index] =~ /^$re[$axis_index]$/u |
|
178
|
1352 |
663 |
unless defined $string and not ref $string |
|
182
|
646 |
17 |
unless ($match) |
|
184
|
322 |
324 |
unless $name |
|
188
|
323 |
18 |
unless $match |
|
191
|
17 |
1 |
if index($match, ",") != -1 |
|
196
|
1417 |
689 |
unless defined $string and not ref $string |
|
200
|
674 |
15 |
unless ($match) |
|
202
|
342 |
332 |
unless $name |
|
206
|
330 |
17 |
unless $match |
|
209
|
16 |
1 |
if index($match, ",") != -1 |
|
214
|
1176 |
876 |
unless ref $array eq "ARRAY" |
|
215
|
602 |
274 |
unless @$array == $self->basis->axis_count + 1 |
|
216
|
237 |
37 |
unless $self->basis->is_name($array->[0]) |
|
221
|
2054 |
38 |
unless $self->basis->is_hash($hash) |