foreach my $ausgabe(@results)
    {   
        print"Ausgabe: $ausgabe \n";
        
    } print "Das ist i: ",$i,"\n";