~/ 274> perl -e 'my $sum = 0; for(0..1000){$sum += 0.01;}print $sum,"\n";'
10.0099999999998