NAME
Geometry::Primitive::Circle - A Circle
DESCRIPTION
Geometry::Primitive::Circle represents an ellipse with equal width and height.
SYNOPSIS
use Geometry::Primitive::Circle;
my $circle = Geometry::Primitive::Circle->new(
radius => 15
);
print $circle->diameter;
ATTRIBUTES
origin
Set/Get the origin of this circle.
radius
Set/Get the radius of this circle.
METHODS
new
Creates a new Geometry::Primitive::Circle
area
Returns the area of this circle.
circumference
Returns the circumference of this circle.
diameter
Returns the diameter of this circle
scale ($amount)
Returns a new circle whose radius is $amount times bigger than this one.
point_end
Set/Get the "end" point of this cicle. Calls point_start
.
point_start
Set/Get the "start" point of this cicle. Returns the point at the circle's origin X coordinate and the origin Y coordinate + radius / 2.
AUTHOR
Cory Watson <gphat@cpan.org>
COPYRIGHT & LICENSE
You can redistribute and/or modify this code under the same terms as Perl itself.