http://www.perlmonks.org?node_id=411394


in reply to strange rounding

What are $units and $p when you do this?
I only get 123.99 when int(0.5 + ($units*$p*100) ) == 12399