Opened by pq at 2010-02-05 18:34
Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161
#!/usr/bin/perl use strict; use warnings; my %colors; while(<DATA>) { next unless($_=~/^\s*(\w+)\s*=\s*(.+)\s*$/); $colors{lc($1)}=$2; } my $name=shift(@ARGV); if($name && $colors{lc($name)}) { print $colors{lc($name)}."\n"; } else { print "$_ = $colors{$_}\n" for(sort keys(%colors)); } __DATA__ Black=#000000 Navy=#000080 DarkBlue=#00008B MediumBlue=#0000CD Blue=#0000FF DarkGreen=#006400 Green=#008000 Teal=#008080 DarkCyan=#008B8B DeepSkyBlue=#00BFFF DarkTurquoise=#00CED1 MediumSpringGreen=#00FA9A Lime=#00FF00 SpringGreen=#00FF7F Aqua=#00FFFF Cyan=#00FFFF MidnightBlue=#191970 DodgerBlue=#1E90FF LightSeaGreen=#20B2AA ForestGreen=#228B22 SeaGreen=#2E8B57 DarkSlateGray=#2F4F4F LimeGreen=#32CD32 MediumSeaGreen=#3CB371 Turquoise=#40E0D0 RoyalBlue=#4169E1 SteelBlue=#4682B4 DarkSlateBlue=#483D8B MediumTurquoise=#48D1CC Indigo =#4B0082 DarkOliveGreen=#556B2F CadetBlue=#5F9EA0 CornflowerBlue=#6495ED MediumAquaMarine=#66CDAA DimGray=#696969 SlateBlue=#6A5ACD OliveDrab=#6B8E23 SlateGray=#708090 LightSlateGray=#778899 MediumSlateBlue=#7B68EE LawnGreen=#7CFC00 Chartreuse=#7FFF00 Aquamarine=#7FFFD4 Maroon=#800000 Purple=#800080 Olive=#808000 Gray=#808080 SkyBlue=#87CEEB LightSkyBlue=#87CEFA BlueViolet=#8A2BE2 DarkRed=#8B0000 DarkMagenta=#8B008B SaddleBrown=#8B4513 DarkSeaGreen=#8FBC8F LightGreen=#90EE90 MediumPurple=#9370D8 DarkViolet=#9400D3 PaleGreen=#98FB98 DarkOrchid=#9932CC YellowGreen=#9ACD32 Sienna=#A0522D Brown=#A52A2A DarkGray=#A9A9A9 LightBlue=#ADD8E6 GreenYellow=#ADFF2F PaleTurquoise=#AFEEEE LightSteelBlue=#B0C4DE PowderBlue=#B0E0E6 FireBrick=#B22222 DarkGoldenRod=#B8860B MediumOrchid=#BA55D3 RosyBrown=#BC8F8F DarkKhaki=#BDB76B Silver=#C0C0C0 MediumVioletRed=#C71585 IndianRed =#CD5C5C Peru=#CD853F Chocolate=#D2691E Tan=#D2B48C LightGrey=#D3D3D3 PaleVioletRed=#D87093 Thistle=#D8BFD8 Orchid=#DA70D6 GoldenRod=#DAA520 Crimson=#DC143C Gainsboro=#DCDCDC Plum=#DDA0DD BurlyWood=#DEB887 LightCyan=#E0FFFF Lavender=#E6E6FA DarkSalmon=#E9967A Violet=#EE82EE PaleGoldenRod=#EEE8AA LightCoral=#F08080 Khaki=#F0E68C AliceBlue=#F0F8FF HoneyDew=#F0FFF0 Azure=#F0FFFF SandyBrown=#F4A460 Wheat=#F5DEB3 Beige=#F5F5DC WhiteSmoke=#F5F5F5 MintCream=#F5FFFA GhostWhite=#F8F8FF Salmon=#FA8072 AntiqueWhite=#FAEBD7 Linen=#FAF0E6 LightGoldenRodYellow=#FAFAD2 OldLace=#FDF5E6 Red=#FF0000 Fuchsia=#FF00FF Magenta=#FF00FF DeepPink=#FF1493 OrangeRed=#FF4500 Tomato=#FF6347 HotPink=#FF69B4 Coral=#FF7F50 Darkorange=#FF8C00 LightSalmon=#FFA07A Orange=#FFA500 LightPink=#FFB6C1 Pink=#FFC0CB Gold=#FFD700 PeachPuff=#FFDAB9 NavajoWhite=#FFDEAD Moccasin=#FFE4B5 Bisque=#FFE4C4 MistyRose=#FFE4E1 BlanchedAlmond=#FFEBCD PapayaWhip=#FFEFD5 LavenderBlush=#FFF0F5 SeaShell=#FFF5EE Cornsilk=#FFF8DC LemonChiffon=#FFFACD FloralWhite=#FFFAF0 Snow=#FFFAFA Yellow=#FFFF00 LightYellow=#FFFFE0 Ivory=#FFFFF0 White=#FFFFFF
Last edited: 2011-06-19 16:12:11 +0200 (CEST)