1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
use Test::More tests => 14;
use Test::NoWarnings;
use Color::Calc( 'OutputFormat' => 'html' );
is(color_get ('F00'), 'red');
is(color ('F00'), 'red');
is(color_mix ('red','blue'), 'purple');
is(color_blend_bw ('red'), '#ff8080');
is(color_blend ('red'), 'grey');
is(color_bw ('red'), '#4d4d4d');
is(color_contrast_bw ('red'), 'white');
is(color_contrast ('red'), 'cyan');
is(color_dark ('red'), 'maroon');
is(color_gray ('red'), '#4d4d4d');
is(color_grey ('red'), '#4d4d4d');
is(color_invert ('red'), 'cyan');
is(color_light ('red'), '#ff8080');
|
