The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Graphics::Primitive::Paint::Gradient::Linear - Linear color blending

DESCRIPTION

Graphics::Primitive::Paint::Gradient::Linear is a gradient along a line.

SYNOPSIS

  use Graphics::Primitive::Paint::Gradient::Linear;

  my $gradient = Graphics::Primitive::Gradient::Linear->new(
      line => Geometry::Primitive::Line->new(
          start => Graphics::Primitive::Point->new(x => 0, y => 0),
          end   => Graphics::Primitive::Point->new(x => 0, y => 10),
      )
  );
  $gradient->add_stop(0.0, $color1);
  $gradient->add_stop(1.0, $color2);

METHODS

Constructor

new

Creates a new Graphics::Primitive::Gradient

Instance Methods

add_stop

Adds a color stop at the specified position

colors

Hashref of colors and their stops. The stops are the keys.

line

The line along which the gradient should run.

stop_count

Count of stops added to this Gradient.

stops

Get the keys of all color stops.

AUTHOR

Cory Watson <gphat@cpan.org>

COPYRIGHT & LICENSE

Copyright 2008-2010 by Cory G Watson.

You can redistribute and/or modify this code under the same terms as Perl itself.