geometry::primitive::rectangle(3pm) [debian man page]

Geometry::Primitive::Rectangle(3pm)			User Contributed Perl Documentation		       Geometry::Primitive::Rectangle(3pm)

NAME

       Geometry::Primitive::Rectangle - 4 sided polygon

DESCRIPTION

       Geometry::Primitive::Rectangle a space defined by a point, a width and a height.

SYNOPSIS

	 use Geometry::Primitive::Rectangle;

	 my $poly = Geometry::Primitive::Rectangle->new();
	 $poly->add_point($point1);
	 $poly->height(100);
	 $poly->width(100);

ATTRIBUTES

   height
       Set/Get the height of this Rectangle.

   origin
       Set/Get the origin of this rectangle.

   width
       Set/Get the width of this Rectangle.

METHODS

   new
       Creates a new Geometry::Primitive::Rectangle

   area
       Returns the area of this rectangle.

   get_points
       Get the points that make up this Rectangle.

   point_end
       Get the end point.  Returns the origin. Provided for Shape role.

   point_start
       Get the start point.  Returns the origin.  Provided for Shape role.

   scale ($amount)
       Scales the hieght and width of this rectangle by the amount specified.

AUTHOR

       Cory Watson <gphat@cpan.org>

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

perl v5.10.1							    2010-01-10				       Geometry::Primitive::Rectangle(3pm)

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.

perl v5.12.3							    2010-08-21			 Graphics::Primitive::Paint::Gradient::Radial(3pm)