Number::Closest - find number(s) closest to a number in a list of numbers
use Number::Closest; my $finder = Number::Closest->new(number => $num, numbers => \@num) ; my $closest = $finder->find; # finds closest number my $closest_two = $finder->find(2) ; # gives arrayref of two closest numbers in list # or, all in one shot Number::Closest->new(number => $num, numbers => \@num)->find(1) ;
<tbone at cpan.org>
Please report any bugs or feature requests to
bug-number-closest at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Number-Closest. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
You can find documentation for this module with the perldoc command.
You can also look for information at:
Copyright 2009 Terrence Brannon, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.