$ perl -e 'printf "%.20f\n", 75.600 * 100' 7559.99999999999909050530 $ perl -e 'printf "%.0f\n", 75.600 * 100' 7560