Help language development. Donate to The Perl Foundation
Color::Scheme - Generate color schemes from a base color
use Color::Scheme;
my $color = Color.new( "#1A3CFA" );
# this is the sugar
my @palette = color-scheme( $color, 'six-tone-ccw' );
# for this
my @palette = color-scheme( $color, color-scheme-angles<six-tone-ccw> );
# debug flag, to visually inspect the colors
# creates "colors.html" in the current directory
my @palette = color-scheme( $color, 'triadic', :debug );
With Color::Scheme you can create schemes/palettes of colors that work well together.
You pick a base color and one of sixteen schemes and the module will generate a list of colors that harmonize. How many colors depends on the scheme.
There are 16 schemes available:
split-complementary (3 colors)
split-complementary-cw (3 colors)
split-complementary-ccw (3 colors)
triadic (3 colors)
clash (3 colors)
tetradic (4 colors)
four-tone-cw (4 colors)
four-tone-ccw (4 colors)
five-tone-a (5 colors)
five-tone-b (5 colors)
five-tone-cs (5 colors)
five-tone-ds (5 colors)
five-tone-es (5 colors)
analogous (6 colors)
neutral (6 colors)
six-tone-ccw (6 colors)
six-tone-cw (6 colors)
Those schemes are just lists of angles in a hash ( Color::Scheme::color-scheme-angles).
You can use the second form of the color-scheme sub to pass in your own angles if you have to.
[email protected]
BSD-3 License (see LICENSE file)
This is free software: you are free to change and redistribute it. There is NO WARRANTY, to the extent permitted by law.