ansi => [qw( cga putty xterm tango app html cgarne )],
legacy => [qw( c64 msx mac2 risc arnegame dawnbringer cpc cpcboy shiar32 ppu 64 )],
+ xcolors => sub {
+ my $pals = do 'termcol-xcolor.inc.pl' or die $! || $@;
+ $_[0]->{$_} = $pals->{$_} for keys %{$pals};
+ return 'xcolor';
+ },
+
html => {
title => 'HTML keywords (inherited by CSSā„2.1 and SVG), mostly identical to X11',
href => 'http://www.w3.org/TR/css3-color/#html4',
320 430 660 773
120 140 360 572
031 040 070 473
- 000 053 000 276
+ 040 053 276 276
022 044 077 467
111 222 444 666
);
+ my %dup;
map { [
- map { [ $_, map { $_ * 255 / 7 } split // ] }
+ map { [ $dup{$_}++ ? "<s>$_</s>" : $_, map { $_ * 255 / 7 } split // ] }
map { $rgb[$_] }
$_*4 .. $_*4+3
] } 0..13