The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Graphics::Color::Equal - Moose equality role

DESCRIPTION

Graphics::Color::Equal is a Moose role for equality.

SYNOPSIS

  with 'Graphics::Color::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.

http://www.iinteractive.com

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