SPVM::EqualityChecker::SameObject - a callback implementation of SPVM::EqualityChecker to check if the memory addresses of the two objects are equal.
use SPVM::EqualityChecker::SameObject; my $equality_checker = SPVM::EqualityChecker::SameObject->new; my $point1 = SPVM::Point->new(1, 2); my $point2 = $point1; my $point3 = SPVM::Point->new(1, 2); # Equals my $is_equal = $equality_checker->($point1, $point2); # Not equals my $is_equal = $equality_checker->($point1, $point3);
SPVM::EqualityChecker::SameObject is a callback implementation of SPVM::EqualityChecker to check if the memory addresses of the two objects are equal.
sub new : SPVM::EqualityChecker::SameObject ()
Create a new SPVM::EqualityChecker::SameObject object.
sub : int ($self : self, $object1 : object, $object2 : object)
If the address of the two objects are equal, return 1, otherwise return 0.
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.