SPVM::EqualityChecker - EqualityChecker in SPVM | a callback interface to check the object equality
use EqualityChecker; my $equality_checker : EqualityChecker = method : int ($object1 : object, $object2 : object) { my $point1 = (Point)$object1; my $point2 = (Point)$object2; if ($point1->x == $point2->x && $point1->y == $point2->y) { return 1; } else { return 0; } }; my $point1 = Point->new(1, 2); my $point2 = Point->new(5, 6); my $is_equal = $equality_checker->($point1, $point2);
EqualityChecker is a callback interface to check the object equality.
method : int ($object1 : object, $object2 : object)
If the two objects are equals, return 1, otherwise return 0.
This method is planned to be implemented in other classes.
To install SPVM, copy and paste the appropriate command in to your terminal.
cpanm
cpanm SPVM
CPAN shell
perl -MCPAN -e shell install SPVM
For more information on module installation, please visit the detailed CPAN module installation guide.