#!/usr/bin/perl

@x11=(
      'AliceBlue',240,248,255,
      'AntiqueWhite',250,235,215,
      'aquamarine',127,255,212,
      'azure',240,255,255,
      'beige',245,245,220,
      'bisque',255,228,196,
      'black',0,0,0,
      'BlanchedAlmond',255,235,205,
      'blue',0,0,255,
      'BlueViolet',138,43,226,
      'brown',165,42,42,
      'burlywood',222,184,135,
      'CadetBlue',95,158,160,
      'chartreuse',127,255,0,
      'chocolate',210,105,30,
      'coral',255,127,80,
      'CornflowerBlue',100,149,237,
      'cornsilk',255,248,220,
      'cyan',0,255,255,
      'DarkBlue',0,0,139,
      'DarkCyan',0,139,139,
      'DarkGoldenrod',184,134,11,
      'DarkGray',169,169,169,
      'DarkGreen',0,100,0,
      'DarkGrey',169,169,169,
      'DarkKhaki',189,183,107,
      'DarkMagenta',139,0,139,
      'DarkOliveGreen',85,107,47,
      'DarkOrange',255,140,0,
      'DarkOrchid',153,50,204,
      'DarkRed',139,0,0,
      'DarkSalmon',233,150,122,
      'DarkSeaGreen',143,188,143,
      'DarkSlateBlue',72,61,139,
      'DarkSlateGray',47,79,79,
      'DarkSlateGrey',47,79,79,
      'DarkTurquoise',0,206,209,
      'DarkViolet',148,0,211,
      'DeepPink',255,20,147,
      'DeepSkyBlue',0,191,255,
      'DimGray',105,105,105,
      'DimGrey',105,105,105,
      'DodgerBlue',30,144,255,
      'firebrick',178,34,34,
      'FloralWhite',255,250,240,
      'ForestGreen',34,139,34,
      'gainsboro',220,220,220,
      'GhostWhite',248,248,255,
      'gold',255,215,0,
      'goldenrod',218,165,32,
      'gray',190,190,190,
      'green',0,255,0,
      'GreenYellow',173,255,47,
      'grey',190,190,190,
      'honeydew',240,255,240,
      'HotPink',255,105,180,
      'IndianRed',205,92,92,
      'ivory',255,255,240,
      'khaki',240,230,140,
      'lavender',230,230,250,
      'LavenderBlush',255,240,245,
      'LawnGreen',124,252,0,
      'LemonChiffon',255,250,205,
      'LightBlue',173,216,230,
      'LightCoral',240,128,128,
      'LightCyan',224,255,255,
      'LightGoldenrod',238,221,130,
      'LightGoldenrodYellow',250,250,210,
      'LightGray',211,211,211,
      'LightGreen',144,238,144,
      'LightGrey',211,211,211,
      'LightPink',255,182,193,
      'LightSalmon',255,160,122,
      'LightSeaGreen',32,178,170,
      'LightSlateBlue',132,112,255,
      'LightSlateGray',119,136,153,
      'LightSlateGrey',119,136,153,
      'LightSteelBlue',176,196,222,
      'LightYellow',255,255,224,
      'LimeGreen',50,205,50,
      'linen',250,240,230,
      'magenta',255,0,255,
      'maroon',176,48,96,
      'MediumAquamarine',102,205,170,
      'MediumBlue',0,0,205,
      'MediumOrchid',186,85,211,
      'MediumPurple',147,112,219,
      'MediumSeaGreen',60,179,113,
      'MediumSlateBlue',123,104,238,
      'MediumSpringGreen',0,250,154,
      'MediumTurquoise',72,209,204,
      'MediumVioletRed',199,21,133,
      'MidnightBlue',25,25,112,
      'MintCream',245,255,250,
      'MistyRose',255,228,225,
      'moccasin',255,228,181,
      'NavajoWhite',255,222,173,
      'navy',0,0,128,
      'NavyBlue',0,0,128,
      'OldLace',253,245,230,
      'OliveDrab',107,142,35,
      'orange',255,165,0,
      'OrangeRed',255,69,0,
      'orchid',218,112,214,
      'PaleGoldenrod',238,232,170,
      'PaleGreen',152,251,152,
      'PaleTurquoise',175,238,238,
      'PaleVioletRed',219,112,147,
      'PapayaWhip',255,239,213,
      'PeachPuff',255,218,185,
      'peru',205,133,63,
      'pink',255,192,203,
      'plum',221,160,221,
      'PowderBlue',176,224,230,
      'purple',160,32,240,
      'red',255,0,0,
      'RosyBrown',188,143,143,
      'RoyalBlue',65,105,225,
      'SaddleBrown',139,69,19,
      'salmon',250,128,114,
      'SandyBrown',244,164,96,
      'SeaGreen',46,139,87,
      'seashell',255,245,238,
      'sienna',160,82,45,
      'SkyBlue',135,206,235,
      'SlateBlue',106,90,205,
      'SlateGray',112,128,144,
      'SlateGrey',112,128,144,
      'snow',255,250,250,
      'SpringGreen',0,255,127,
      'SteelBlue',70,130,180,
      'tan',210,180,140,
      'thistle',216,191,216,
      'tomato',255,99,71,
      'turquoise',64,224,208,
      'violet',238,130,238,
      'VioletRed',208,32,144,
      'wheat',245,222,179,
      'white',255,255,255,
      'WhiteSmoke',245,245,245,
      'yellow',255,255,0,
      'YellowGreen',154,205,50,
      '',0,0,0,
      '',0,0,0,
      );

$w=3;

print "<table align=\"center\">\n";

$c=0;

while(@x11)
{
    $name=shift @x11;
    $red=shift @x11;
    $green=shift @x11;
    $blue=shift @x11;

    $rgb=sprintf("#%02x%02x%02x",$red,$green,$blue);

    print "<tr>\n" unless $c;

    if($name)
    {
	print '<td bgcolor="'.lc($name).'">&nbsp;&nbsp;<font color="'.$rgb.'">XX</font>&nbsp;&nbsp;</td><td class="twist">'.
	    $name.'</td><td class="twist" align="center"><pre>'."$rgb</pre></td>\n";
    }
    else
    {
	print '<td>&nbsp;</td><td>&nbsp;</td><td>&nbsp;</td>';
    }

    print "</tr>\n" if $c==$w;

    $c++;
    $c=0 if $c>$w;
}

print "</table>\n";