This is really a stupid example. It reads (string, int, int) triads from STDIN and applies simple rules to them:
string must be a valid identifier;
it must be unique;
first int must be nonzero;
second int must be divisible by the first one.
If these conditions are met, a value is added to a global hash that is printed at the end.
To install Assert::Refute, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Assert::Refute
CPAN shell
perl -MCPAN -e shell install Assert::Refute
For more information on module installation, please visit the detailed CPAN module installation guide.