Help for this page

Select Code to Download

Select or download this

use POSIX 'floor';

...
  my $x = shift;
  floor($x + 0.5);
}