| line |
true |
false |
branch |
|
22
|
9 |
1 |
if ref $_[0] eq 'Color::Spectrum' |
|
23
|
0 |
10 |
if @_ < 2 |
|
34
|
3 |
7 |
unless $col1 =~ /^#?[a-f0-9]{6}$/i |
|
35
|
3 |
7 |
unless $col2 =~ /^#?[a-f0-9]{6}$/i |
|
37
|
1 |
9 |
unless $col1 |
|
38
|
1 |
8 |
unless $col2 |
|
45
|
0 |
8 |
if $cnt < 0 |
|
49
|
1 |
0 |
wantarray ? : |
|
|
1 |
7 |
if $cnt <= 1 |
|
50
|
1 |
0 |
wantarray ? : |
|
|
1 |
6 |
if $cnt == 2 |
|
60
|
0 |
6 |
if (uc $col1 eq uc $col2) { } |
|
61
|
0 |
0 |
$clockwise ? : |
|
63
|
0 |
6 |
$hd < 0 ? : |
|
70
|
0 |
36 |
if $h1 > 1 |
|
71
|
0 |
36 |
if $h1 < 0 |
|
76
|
6 |
0 |
wantarray ? : |
|
84
|
6 |
6 |
if $i == 0 |
|
89
|
5 |
1 |
if $s == 0 |
|
100
|
0 |
36 |
if $i == 0 |
|
101
|
28 |
8 |
if $s == 0 |
|
112
|
0 |
24 |
$_ > 1 ? : |
|
|
0 |
24 |
$_ < 0 ? : |