2013-09-25T07:32:47 Muffi

Nein, der Testcode war nicht falsch.
Wenn du $Math::Round::half auf 0.5 setzt gehen andere Testfälle kaputt. Drum stehts ja standardmässig nicht auf 0.5.

Dann leite mir jetzt bitte nochmal diese Aussage her:

2013-09-24T09:10:22 Muffi

Math::Round

Code (perl): (dl )

1
2
3

use Math::Round;
print nearest(.01, $var);
print round($var);

Da muss man keine eigenen kaufmännischen Rundungsfunktionen baun.

Du schlägst vor, Math::Round für kfm. Runden zu verwenden.
Wenn man dir falsche Ergebnisse zeigt schlägst du einen zusätzlichen Parameter vor, von dem du aber selbst einschränkst, dass der andere Testfälle kaputt macht.

Kann man nun mit Math::Round kfm. Runden oder nicht?