NAME
Math::Round::Var - Variations on rounding.
SYNOPSIS
use Math::Round::Var;
my $rnd = Math::Round::Var->new($scheme);
$num = $rnd->round($num);
DESCRIPTION
This module gives you the ability to round numbers to either decimal or fractional precision.
AUTHOR
Eric L. Wilhelm
ewilhelm at sbcglobal dot net
http://pages.sbcglobal.net/mycroft/
COPYRIGHT
This module is copyright (C) 2003 by Eric L. Wilhelm.
LICENSE
This module is distributed under the same terms as Perl. See the Perl source package for details.
You may use this software under one of the following licenses:
(1) GNU General Public License
(found at http://www.gnu.org/copyleft/gpl.html)
(2) Artistic License
(found at http://www.perl.com/pub/language/misc/Artistic.html)
CHANGES
0.01 First public release
Front-End Constructor
The Math::Round::Var::new() function only decides between the two sub-packages based on the format of your precision argument.
This is the extent of the purpose of the Math::Round::Var class.
new
Math::Round::Var->new($precision);
format_of
Returns "decimal" or "fraction" for $type based on the format of $precision. If $type is "decimal", then $count will be the number of digits to use.
my ($type, $count) = format_of($precision);
Valid formats should be any of the number formats which are used by Perl. Basically, the 'fraction' methods will work for anything (as long as Perl can divide by it), but we would be wasting time if we only want to round to a certain decimal place.
Decimal-based rounding
new
Creates a new decimal-based rounding object.
Math::Round::Var::Float->new(precision => 7);
The argument to precision is the number of digits to use in rounding. This is used as part of a sprintf() format.
round
$number = $rounder->round($number);
Fraction-based rounding.
new
Math::Round::Var::Fraction->new();
round
$number = $rounder->round($number);
2 POD Errors
The following errors were encountered while parsing the POD:
- Around line 98:
'=item' outside of any '=over'
- Around line 148:
You forgot a '=back' before '=head1'