| line |
true |
false |
branch |
|
26
|
6 |
42 |
if @args == 3 or Graphics::Toolkit::Color::Space::Hub::is_space($args[0]) |
|
27
|
4 |
44 |
if @args == 6 or @args == 8 |
|
28
|
5 |
43 |
unless @args == 1 |
|
35
|
15 |
152 |
if (not ref $color_def and substr($color_def, 0, 1) =~ /\w/u and not $color_def =~ /,/u) { } |
|
|
37 |
115 |
elsif (ref $color_def eq 'Graphics::Toolkit::Color') { } |
|
39
|
1 |
14 |
if ($i > -1) { } |
|
44
|
1 |
0 |
if $@ |
|
47
|
0 |
0 |
if $@ |
|
51
|
0 |
0 |
unless @rgb == 3 |
|
54
|
1 |
13 |
unless @rgb == 3 |
|
62
|
10 |
105 |
unless ref $value_obj |
|
69
|
3 |
125 |
unless ref $value_obj eq "Graphics::Toolkit::Color::Values" |
|
77
|
2 |
1 |
unless $_[0]{'name'} |
|
92
|
43 |
0 |
@_ == 1 ? : |
|
|
123 |
43 |
!(@_ % 2) ? : |
|
103
|
1 |
0 |
@_ == 1 ? : |
|
|
69 |
1 |
!(@_ % 2) ? : |
|
107
|
0 |
70 |
unless defined $c2 |
|
109
|
0 |
70 |
unless ref $c2 eq "Graphics::Toolkit::Color" |
|
116
|
29 |
1 |
!(@_ % 2) ? : |
|
|
2 |
30 |
ref $_[0] eq 'HASH' ? : |
|
119
|
29 |
3 |
keys %$arg ? : |
|
125
|
2 |
6 |
unless ref $arg |
|
132
|
1 |
5 |
unless ref $arg |
|
140
|
0 |
12 |
unless ref $arg |
|
142
|
0 |
12 |
unless ref $c2 |
|
145
|
0 |
12 |
unless Graphics::Toolkit::Color::Space::Hub::is_space($space_name) |
|
159
|
0 |
6 |
unless ref $arg eq "HASH" |
|
161
|
0 |
6 |
unless ref $c2 |
|
165
|
5 |
1 |
$power >= 0 ? : |
|
166
|
1 |
5 |
if $steps == 1 |
|
168
|
0 |
5 |
unless ref $space |
|
190
|
0 |
0 |
@_ == 1 ? : |
|
|
8 |
0 |
!(@_ % 2) ? : |
|
194
|
1 |
7 |
exists $arg{'hue_tilt'} ? : |
|
|
0 |
8 |
exists $arg{'h'} ? : |
|
195
|
0 |
8 |
if ref $hue_tilt |
|
197
|
1 |
6 |
exists $arg{'saturation_tilt'} ? : |
|
|
1 |
7 |
exists $arg{'s'} ? : |
|
198
|
0 |
8 |
if ref $saturation_tilt and ref $saturation_tilt ne "HASH" |
|
200
|
1 |
7 |
if (ref $saturation_tilt eq "HASH") |
|
202
|
0 |
1 |
if not defined $space_name or $space_name ne "HSL" or not exists $pos_hash->{'1'} |
|
203
|
1 |
0 |
if exists $pos_hash->{'0'} |
|
207
|
1 |
6 |
exists $arg{'lightness_tilt'} ? : |
|
|
1 |
7 |
exists $arg{'l'} ? : |
|
208
|
0 |
8 |
if ref $lightness_tilt and ref $lightness_tilt ne "HASH" |
|
210
|
1 |
7 |
if (ref $lightness_tilt eq "HASH") |
|
212
|
0 |
1 |
if not defined $space_name or $space_name ne "HSL" or not exists $pos_hash->{'2'} |
|
213
|
1 |
0 |
if exists $pos_hash->{'0'} |
|
225
|
1 |
7 |
if ($saturation_axis_offset) |
|
229
|
0 |
1 |
$dmin_first ? : |
|
231
|
0 |
1 |
if $dmin_first |
|
232
|
0 |
1 |
$dmin_first ? : |
|
237
|
1 |
7 |
if ($lightness_axis_offset) |
|
241
|
0 |
1 |
$dmin_first ? : |
|
243
|
0 |
1 |
if $dmin_first |
|
244
|
0 |
1 |
$dmin_first ? : |
|
252
|
4 |
4 |
if $steps < 2 |
|
253
|
0 |
4 |
if $steps == 2 |
|
260
|
0 |
4 |
if $hue_tilt < 0 |
|
269
|
6 |
7 |
if ($hue_current_naive >= $hue_turn_point[$hi]) { } |
|
285
|
6 |
7 |
if ($hue_current_naive >= $sat_turn_point[$si]) { } |
|
294
|
5 |
8 |
if ($hue_current_naive >= $light_turn_point[$li]) { } |
|
312
|
0 |
0 |
unless ref $arg eq "HASH" |