Help for this page
# Rounders.pm # ... } 1;
#!/usr/local/bin/perl # ... printf qq{ %2d - %s\n}, $_, rndPlaces($val, $_) for -4 .. 4;
Original value - 724934.817084 Rounded to whole number - 724935 ... 2 - 724934.82 3 - 724934.817 4 - 724934.8171