my $zufall = int(rand(100));