redhat 7.2
Linux 2.4.16-y0l0 #2 Fri Dec 7 11:38:58 CET 2001 i686
Color::Rgb 1.1
perl 5.6.0
===========
in rgb.txt, lines such as
0 0 139 DarkBlue
are not correctly parsed ! See sample script :
============
#!/usr/bin/perl
#-w sinon des tas de warnings
use strict;
use Color::Rgb;
my $rgb = new Color::Rgb(rgb_txt=>'/usr/X11R6/lib/X11/rgb.txt');
my @Namedcolors = $rgb->names();
my %hex2name;
foreach (@Namedcolors){
my $hex = $rgb->hex($_);
$hex2name{$hex}= $_;
print $hex,"=>",$hex2name{$hex},"\n";
}
====================
outputs :
...
8b8b0=>yellow4
=>darkblue <- no hex value !
f8f8ff=>ghostwhite
...
Marc-Olivier Bernard