my $rest = $zahlA % $zahlB;