For details read Perl NOC. After June 25

Cory G Watson >
Geometry-Primitive >
Geometry::Primitive::Arc

Geometry::Primitive::Arc - Portion of the circumference of a Circle

Geometry::Primitive::Arc represents a closed segment of a curve.

use Geometry::Primitive::Arc; my $arc = Geometry::Primitive::Arc->new( angle_start => 0, angle_end => 1.57079633, radius => 15 );

The starting angle for this arc in radians.

The ending angle for this arc in radians.

Returns the radius of the arc.

Set/Get the origin of this arc.

Creates a new Geometry::Primitive::Arc

Given angle in radians returns the point at that angle on this arc. Returns undef if the angle falls outside this arc's range.

Returns the length of this arc.

Get the end point. Provided for Shape role.

Get the start point. Provided for Shape role.

Increases the radius by multiplying it by the supplied amount.

Cory Watson <gphat@cpan.org>

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

syntax highlighting: