Number::Compare - numeric comparisons
Number::Compare->new(">1Ki")->test(1025); # is 1025 > 1024 my $c = Number::Compare->new(">1M"); $c->(1_200_000); # slightly terser invocation
Number::Compare compiles a simple comparison to an anonymous subroutine, which you can call with a value to be tested again.
Now this would be very pointless, if Number::Compare didn't understand magnitudes.
The target value may use magnitudes of kilobytes (
ki), megabytes (
mi), or gigabytes (
gi). Those suffixed with an
i use the appropriate 2**n version in accordance with the IEC standard: http://physics.nist.gov/cuu/Units/binary.html
Returns a new object that compares the specified test.
A longhanded version of $compare->( $value ). Predates blessed subroutine reference implementation.
Returns a perl code fragment equivalent to the test.
Richard Clamp <email@example.com>
Copyright (C) 2002,2011 Richard Clamp. All Rights Reserved.
This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.