Geometry::Primitive::Bezier.3pm

Langue: en

Version: 2010-01-10 (ubuntu - 24/10/10)

Section: 3 (Bibliothèques de fonctions)

Sommaire

NAME

Geometry::Primitive::Bezier - Cubic BA~Xzier Curve

DESCRIPTION

Geometry::Primitive::Bezier represents a cubic BA~Xzier curve.

SYNOPSIS

   use Geometry::Primitive::Bezier;
 
   my $line = Geometry::Primitive::Bezier->new(
       start => $point1,
       control1 => $point2,
       control2 => $point3,
       end => $point4
   );

ATTRIBUTES

control1

Set/Get the first control point of the curve.

control2

Set/Get the second control point of the curve.

end

Set/Get the end point of the curve.

start

Set/Get the start point of the line.

METHODS

new

Creates a new Geometry::Primitive::Bezier

grow

Does nothing, as I'm not sure how. Patches or hints welcome.

point_end

Get the end point. Provided for Shape role.

point_start

Get the start point. Provided for Shape role.

scale

Scales this curve by the amount provided. Multiplies each coordinate by the amount.

to_string

Guess!

AUTHOR

Cory Watson <gphat@cpan.org> You can redistribute and/or modify this code under the same terms as Perl itself.