Scroll to navigation

Geometry::Primitive::Equal(3pm) User Contributed Perl Documentation Geometry::Primitive::Equal(3pm)

NAME

Geometry::Primitive::Equal - Equality Role

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>

COPYRIGHT & LICENSE

You can redistribute and/or modify this code under the same terms as Perl itself.
2014-01-25 perl v5.18.2