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


in reply to How to calculate the sum of columns to be equal to 100?

Please tell us what you have in $fraction_zero, $fraction_single, etc.

But in general, the sum of rounded amounts cannot be guaranteed to be equal to the rounded total of the same not-rounded amounts. This is not a Perl issue, but simple arithmetics.