---
name: "Geometry::Primitive::Polygon"
section: "3pm"
platform: "linux"
package: "libgeometry-primitive-perl"
version: "0.24-3"
release: "Debian 13 (Trixie)"
platforms: ["linux"]
url: "https://new.carta.tech/Geometry::Primitive::Polygon"
---

# Geometry::Primitive::Polygon(3pm)

Closed shape with an arbitrary number of points.

## NAME

Geometry::Primitive::Polygon - Closed shape with an arbitrary number of points.

## 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::Polygon

### area

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 \<gphat@cpan.org\>

## COPYRIGHT & LICENSE

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