#!/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 "\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 "\n" unless $c; if($name) { print '\n"; } else { print ''; } print "\n" if $c==$w; $c++; $c=0 if $c>$w; } print "
  XX  '. $name.'
'."$rgb
   
\n";