note
I0
<code>$rounded = int ( $orig + 0.5 )</code> assumes $rounded is positive.<br>
More generally: <code> use POSIX; $rounded = floor ( $orig + 0.5 )</code>
<br> or <code>$rounded = sprintf( "%.f" , $orig )</code> to properly handle the half-way case
<br>See also `perldoc -q round`
24335
24343