| 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 |
288 |
unless defined $suffix |
|
51
|
10 |
511 |
unless ref $suffix |
|
52
|
1 |
520 |
unless ref $suffix eq "ARRAY" |
|
53
|
3 |
517 |
unless @$suffix == $count |
|
58
|
2241 |
239 |
unless defined $suffix |
|
64
|
0 |
31 |
if not defined $format or ref $format or ref $code ne "CODE" |
|
65
|
0 |
31 |
if $self->has_formatter($format) |
|
70
|
0 |
31 |
if not defined $format or ref $format or ref $code ne "CODE" |
|
71
|
0 |
31 |
if $self->has_deformatter($format) |
|
76
|
0 |
15 |
if ref $pre_code ne "CODE" or ref $post_code ne "CODE" |
|
83
|
117 |
47 |
defined $_[1] && exists $_[0]{'formatter'}{lc $_[1]} ? : |
|
84
|
1 |
32 |
defined $_[1] && exists $_[0]{'deformatter'}{lc $_[1]} ? : |
|
88
|
0 |
2140 |
unless defined $color |
|
90
|
0 |
2140 |
unless ref $suffix |
|
94
|
8343 |
177 |
unless ref $values |
|
96
|
61 |
116 |
unless ref $values |
|
98
|
0 |
116 |
unless ref $values |
|
99
|
94 |
22 |
wantarray ? : |
|
105
|
0 |
125 |
unless $self->basis->is_value_tuple($values) |
|
106
|
12 |
113 |
unless $self->has_formatter($format) |
|
108
|
3 |
110 |
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 |
110 |
unless $self->basis->is_value_tuple($values) |
|
140
|
0 |
110 |
unless ref $suffix |
|
142
|
4 |
106 |
if (ref $self->{'value_numifier'}{'from_numeric'}) |
|
144
|
0 |
4 |
unless $self->basis->is_value_tuple($values) |
|
149
|
311 |
25 |
unless $suffix->[$axis_index] |
|
152
|
25 |
0 |
if substr($values->[$axis_index], -$suf_length) ne $suffix->[$axis_index] |
|
160
|
18 |
159 |
if ref $values ne "ARRAY" |
|
161
|
21 |
138 |
if @$values != $self->basis->axis_count |
|
164
|
22 |
367 |
unless $values->[$axis_index] =~ /^$re[$axis_index]$/u |
|
178
|
1376 |
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
|
1441 |
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 |
900 |
unless ref $array eq "ARRAY" |
|
215
|
626 |
274 |
unless @$array == $self->basis->axis_count + 1 |
|
216
|
237 |
37 |
unless $self->basis->is_name($array->[0]) |
|
221
|
2078 |
38 |
unless $self->basis->is_hash($hash) |