NAME
Geometry::Primitive::Equal
DESCRIPTION
Geometry::Primitive::Equal is a Moose role for equality.
SYNOPSIS
with 'Geometry::Primitive::Equal';
sub equal_to {
my ($self, $other) = @_;
# compare and return!
}METHODS
- equal_to
-
Implement this.
- not_equal_to
-
Provided you implement equal_to, this will be implemented for you!
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.