DESCRIPTIONGeometry::Primitive::Arc represents a closed segment of a curve.
my $arc = Geometry::Primitive::Arc->new(
angle_start => 0,
angle_end => 1.57079633,
radius => 15
angle_startThe starting angle for this arc in radians.
angle_endThe ending angle for this arc in radians.
radiusReturns the radius of the arc.
originSet/Get the origin of this arc.
newCreates a new Geometry::Primitive::Arc
get_point_at_angleGiven angle in radians returns the point at that angle on this arc. Returns undef if the angle falls outside this arc's range.
lengthReturns the length of this arc.
point_endGet the end point. Provided for Shape role.
point_startGet the start point. Provided for Shape role.
scale ($amount)Increases the radius by multiplying it by the supplied amount.
AUTHORCory Watson <[email protected]>
COPYRIGHT & LICENSEYou can redistribute and/or modify this code under the same terms as Perl itself.