1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
# $Id: 11_import_html.t,v 1.2 2005/04/09 20:49:59 cfaerber Exp $
#
use Test::More tests => 13;
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'), 'gray');
is(color_bw ('red'), '#4d4d4d');
is(color_contrast_bw ('red'), 'white');
is(color_contrast ('red'), 'aqua');
is(color_dark ('red'), 'maroon');
is(color_gray ('red'), '#4d4d4d');
is(color_grey ('red'), '#4d4d4d');
is(color_invert ('red'), 'aqua');
is(color_light ('red'), '#ff8080');
|
