Geometry::Primitive::Bezier(3p)

NAME
Geometry::Primitive::Bezier - Cubic Bézier Curve

DESCRIPTION
Geometry::Primitive::Bezier represents a cubic Bézier 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>

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