Scroll to navigation

Graphics::Primitive::Paint::Gradient::Radial(3pm) User Contributed Perl Documentation Graphics::Primitive::Paint::Gradient::Radial(3pm)

NAME

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

DESCRIPTION

Graphics::Primitive::Paint::Gradient::Radial is a color blend between two circles.

SYNOPSIS

  use Graphics::Primitive::Paint::Gradient::Radial;

  my $gradient = Graphics::Primitive::Gradient::Radial->new(
      start => Geometry::Primitive::Circle->new(
          origin => 0, 0,
          radius => 5
      ),
      end => Geometry::Primitive::Circle->new(
          origin => 50, 25,
          radius => 5
      )
  );
  $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.
end
The "end" circle.
start
The "start" circle.
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.

2015-01-04 perl v5.20.2