NAME
Geometry::Primitive::Line
DESCRIPTION
Geometry::Primitive::Line represents a straight curve defined by two points.
SYNOPSIS
use Geometry::Primitive::Line;
my $line = Geometry::Primitive::Line->new();
$line->start($point1);
$line->end($point2);METHODS
Constructor
- new
-
Creates a new Geometry::Primitive::Line
Instance Methods
- contains_point
-
Returns true if the supplied point is 'on' the line. Accepts either a point object or an x y pair.
- end
-
Set/Get the end point of the line.
- grow
-
Does nothing, as I'm not show how. Patches or hints welcome.
- is_parallel ($other_line)
-
Returns true if the supplied line is parallel to this one.
- is_perpendicular ($other_line)
-
Returns true if the supplied line is perpendicular to this one.
- length
-
Get the length of the line.
- point_end
-
Get the end point. Provided for Shape role.
- point_start
-
Get the start point. Provided for Shape role.
- scale
-
Does nothing at the moment.
- slope
-
Get the slope of the line.
- start
-
Set/Get the start point of the line.
- to_string
-
Guess!
- y_intercept
-
Returns the Y intercept of this line.
AUTHOR
Cory Watson <gphat@cpan.org>
Infinity Interactive, http://www.iinteractive.com
COPYRIGHT & LICENSE
Copyright 2008 by Infinity Interactive, Inc.
You can redistribute and/or modify this code under the same terms as Perl itself.