for(my $zz = $zeiger - 1; $zz > -1; $zz--)