$cent = int(0.5 + ($u*$p*100); # => 12400, ok
#but
  $dollar = $cent / 100; # => 123.99
# even if you use sprintf (which itself does 
#  NOT round financially, you have to it yourself!
  $dollar = sprintf ".2f", $cent/100; # => 123.99 Dollar