| Geometry::Primitive::Equal(3pm) | User Contributed Perl Documentation | Geometry::Primitive::Equal(3pm) |
Geometry::Primitive::Equal - Equality Role
Geometry::Primitive::Equal is a Moose role for equality.
with 'Geometry::Primitive::Equal';
sub equal_to {
my ($self, $other) = @_;
# compare and return!
}
Implement this.
Provided you implement "equal_to", this will be implemented for you!
Cory Watson <gphat@cpan.org>
You can redistribute and/or modify this code under the same terms as Perl itself.
| 2022-12-12 | perl v5.36.0 |