DESCRIPTION
Geometry::Primitive::Polygon represents a two dimensional figure bounded by a series of points that represent a closed path.SYNOPSIS
use Geometry::Primitive::Polygon;
my $poly = Geometry::Primitive::Polygon->new;
$poly->add_point($point1);
$poly->add_point($point2);
$poly->add_point($point3);
# No need to close the path, it's handled automatically
ATTRIBUTES
points
Set/Get the arrayref of points that make up this Polygon.METHODS
new
Creates a new Geometry::Primitive::Polygonarea
Area of this polygon. Assumes it is non-self-intersecting.add_point
Add a point to this polygon.clear_points
Clears all points from this polygon.point_count
Returns the number of points that bound this polygon.get_point
Returns the point at the specified offset.point_end
Get the end point. Provided for Shape role.point_start
Get the start point. Provided for Shape role.scale ($amount)
Scale this this polygon by the supplied amount.AUTHOR
Cory Watson <[email protected]>COPYRIGHT & LICENSE
You can redistribute and/or modify this code under the same terms as Perl itself.