Help for this page
use POSIX qw(ceil); print ceil(3.5); # prints 4 print ceil(4); # also prints 4
sub roundup { my $n = shift; return(($n == int($n)) ? $n : int($n + 1)) }
www.com | www.net | www.org
No recent polls found
