my $a = 5; # 5 Euro auf dem Konto $a += 0.01 for (1..50); # Gutschrift von 50 mal 1 Cent # hier den Kontostand kaufmännisch gerundet auf ganze Euro # Erwartet: 5 Euro + 50 * 1 Cent = 5,50 Euro; Kaufm. Ger. = 6 Euro ...