| line |
true |
false |
branch |
|
27
|
6 |
42 |
if @args == 3 or Graphics::Toolkit::Color::Space::Hub::is_space($args[0]) |
|
28
|
4 |
44 |
if @args == 6 or @args == 8 |
|
29
|
5 |
43 |
unless @args == 1 |
|
36
|
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') { } |
|
40
|
1 |
14 |
if ($i > -1) { } |
|
45
|
1 |
0 |
if $@ |
|
48
|
0 |
0 |
if $@ |
|
52
|
0 |
0 |
unless @rgb == 3 |
|
55
|
1 |
13 |
unless @rgb == 3 |
|
63
|
10 |
105 |
unless ref $value_obj |
|
70
|
3 |
125 |
unless ref $value_obj eq "Graphics::Toolkit::Color::Values" |
|
78
|
2 |
1 |
unless $_[0]{'name'} |
|
93
|
43 |
0 |
@_ == 1 ? : |
|
|
123 |
43 |
!(@_ % 2) ? : |
|
104
|
1 |
0 |
@_ == 1 ? : |
|
|
69 |
1 |
!(@_ % 2) ? : |
|
108
|
0 |
70 |
unless defined $c2 |
|
110
|
0 |
70 |
unless ref $c2 eq "Graphics::Toolkit::Color" |
|
117
|
29 |
1 |
!(@_ % 2) ? : |
|
|
2 |
30 |
ref $_[0] eq 'HASH' ? : |
|
120
|
29 |
3 |
keys %$arg ? : |
|
126
|
2 |
6 |
unless ref $arg |
|
133
|
1 |
5 |
unless ref $arg |
|
141
|
0 |
12 |
unless ref $arg |
|
143
|
0 |
12 |
unless ref $c2 |
|
146
|
0 |
12 |
unless Graphics::Toolkit::Color::Space::Hub::is_space($space_name) |
|
160
|
0 |
6 |
unless ref $arg eq "HASH" |
|
162
|
0 |
6 |
unless ref $c2 |
|
166
|
5 |
1 |
$power >= 0 ? : |
|
167
|
1 |
5 |
if $steps == 1 |
|
169
|
0 |
5 |
unless ref $space |
|
191
|
0 |
0 |
@_ == 1 ? : |
|
|
8 |
0 |
!(@_ % 2) ? : |
|
195
|
1 |
7 |
exists $arg{'hue_tilt'} ? : |
|
|
0 |
8 |
exists $arg{'h'} ? : |
|
196
|
0 |
8 |
if ref $hue_tilt |
|
198
|
1 |
6 |
exists $arg{'saturation_tilt'} ? : |
|
|
1 |
7 |
exists $arg{'s'} ? : |
|
199
|
0 |
8 |
if ref $saturation_tilt and ref $saturation_tilt ne "HASH" |
|
201
|
1 |
7 |
if (ref $saturation_tilt eq "HASH") |
|
203
|
0 |
1 |
if not defined $space_name or $space_name ne "HSL" or not exists $pos_hash->{'1'} |
|
204
|
1 |
0 |
if exists $pos_hash->{'0'} |
|
208
|
1 |
6 |
exists $arg{'lightness_tilt'} ? : |
|
|
1 |
7 |
exists $arg{'l'} ? : |
|
209
|
0 |
8 |
if ref $lightness_tilt and ref $lightness_tilt ne "HASH" |
|
211
|
1 |
7 |
if (ref $lightness_tilt eq "HASH") |
|
213
|
0 |
1 |
if not defined $space_name or $space_name ne "HSL" or not exists $pos_hash->{'2'} |
|
214
|
1 |
0 |
if exists $pos_hash->{'0'} |
|
226
|
1 |
7 |
if ($saturation_axis_offset) |
|
230
|
0 |
1 |
$dmin_first ? : |
|
232
|
0 |
1 |
if $dmin_first |
|
233
|
0 |
1 |
$dmin_first ? : |
|
238
|
1 |
7 |
if ($lightness_axis_offset) |
|
242
|
0 |
1 |
$dmin_first ? : |
|
244
|
0 |
1 |
if $dmin_first |
|
245
|
0 |
1 |
$dmin_first ? : |
|
253
|
4 |
4 |
if $steps < 2 |
|
254
|
0 |
4 |
if $steps == 2 |
|
261
|
0 |
4 |
if $hue_tilt < 0 |
|
270
|
6 |
7 |
if ($hue_current_naive >= $hue_turn_point[$hi]) { } |
|
286
|
6 |
7 |
if ($hue_current_naive >= $sat_turn_point[$si]) { } |
|
295
|
5 |
8 |
if ($hue_current_naive >= $light_turn_point[$li]) { } |
|
313
|
0 |
0 |
unless ref $arg eq "HASH" |