my $pos_betrag = floor(.57 * 100);
print "POSIX : >$pos_betrag<\n";