my $rund = sprintf '%.0f', $wert); my $rund = int($wert + 0.5);