QUOTED_MESSAGE: > On Fri, 18 May 2001, Mike Depot wrote: [SNIP] > > I thought you might want to know that I just committed > named parameter support for Imager::Color to CVS (under the > exp_represent branch). > > Now we just need to do it for all the other > places... > > Tony > > An excerpt from Imager/Color.pm: > > You can specify colors in several different ways, you > can just supply simple values: > > =over > > =item * > > simple numeric parameters - if you supply 3 or 4 > numeric arguments, you get a color made up of those RGB (and > possibly A) components. > > =item * > > a six hex digit web color, either 'RRGGBB' or > '#RRGGBB' > > =item * > > an eight hex digit web color, either 'RRGGBBAA' or > '#RRGGBBAA'. > > =item * > > a 3 hex digit web color, '#RGB' - a value of F becomes > 255. > > =item * > > a color name, from whichever of the gimp Named_Colors > file or X rgb.txt is found first. The same as using the > name keyword. > > =back > > You can supply named parameters: > > =over > > =item * > > 'red', 'green' and 'blue', optionally shortened to 'r', > 'g' and 'b'. The color components in the range 0 to > 255. > >  # all of the following are equivalent >  my $c1 = Imager::Color->new(red=>100, > blue=>255, green=>0); >  my $c2 = Imager::Color->new(r=>100, > b=>255, g=>0); >  my $c3 = Imager::Color->new(r=>100, > blue=>255, g=>0); > > =item * > > 'hue', 'saturation' and 'value', optionally shortened > to 'h', 's' and 'v', to specify a HSV color. 0 <= hue > < 360, 0 <= s <= 1 and 0 <= v > <= 1. > >   # the same as RGB(127,255,127) >   my $c1 = Imager::Color->new(hue=>120, > v=>1, s=>0.5); >   my $c1 = Imager::Color->new(hue=>120, > value=>1, saturation=>0.5); > > =item * > > 'web', which can specify a 6 or 3 hex digit web color, > in any of the forms '#RRGGBB', '#RGB', 'RRGGBB' or > 'RGB'. > >   my $c1 = Imager::Color->new(web=>'#FFC0C0'); > # pale red > > =item * > > 'gray' or 'grey' which specifies a single channel, from > 0 to 255. > >   # exactly the same >   my $c1 = Imager::Color->new(gray=>128); >   my $c1 = Imager::Color->new(grey=>128); > > =item * > > 'rgb' which takes a 3 member arrayref, containing each > of the red, green and blue values. > >   # the same >   my $c1 = Imager::Color->new(rgb=>[255, > 100, 0]); >   my $c1 = Imager::Color->new(r=>255, > g=>100, b=>0); > > =item * > > 'hsv' which takes a 3 member arrayref, containting each > of hue, saturation and value. > >   # the same >   my $c1 = Imager::Color->new(hsv=>[120, > 0.5, 1]); >   my $c1 = Imager::Color->new(hue=>120, > v=>1, s=>0.5); > > =item * > > 'gimp' which specifies a color from a GIMP palette > file. You can specify the filename of the palette file with > the 'palette' parameter, or let Imager::Color look in > various places, typically > "$HOME/gimp-1.x/palettes/Named_Colors" with > and without the version number, and in /usr/share/gimp/palettes/. > The palette file must have color names. > >   my $c1 = Imager::Color->new(gimp=>'snow'); >   my $c1 = Imager::Color->new(gimp=>'snow', > palette=>'testimg/test_gimp_pal); > > =item * > > 'xname' which specifies a color from an X11 rgb.txt > file. You can specify the filename of the rgb.txt file with > the 'palette' parameter, or let Imager::Color look in > various places, typically '/usr/lib/X11/rgb.txt'. > >   my $c1 = Imager::Color->new(xname=>'blue') > # usually RGB(0, 0, 255) > > =item * > > 'name' which specifies a name from either a GIMP > palette or an X rgb.txt file, whichever is found > first. > > =item * > > 'channel0', 'channel1', etc, each of which specifies a > single channel. These can be abbreviated to 'c0', 'c1' > etc. > > =item * > > 'channels' which takes an arrayref of the channel > values. > > =back > > Optionally you can add an alpha channel to a color with > the 'alpha' or 'a' parameter. > > These color specifications can be used for both > constructing new colors with the new() method and modifying > existing colors with the set() method.

  EKKI skrifa neitt hér: