$counter=0;

foreach (@array) {

#print $array[$counter] . "\n";

my $queryextstatus = "SELECT value_text FROM dynamic_field_value
WHERE object_id = $_
AND field_id = 80";

my $sth = $dbh->prepare($queryextstatus);
        $sth->execute();
while ( @row = $sth->fetchrow_array ){
    $ticketextstatus = " @row";

}

open (DATEI, ">>status.txt" ) or die $!;
   print DATEI $ticketextstatus;
close (DATEI);




open (DATEI, "status.txt") or die $!;
   my @daten = <DATEI>;
close (DATEI);

my @array;
my $a;
push (@array, @daten);
print "Anzahl: ".scalar(@array)."\n";
for $a(@array){

}

print $array[$counter] . "\n";

$_=$counter++;



#my $queryextstatus = "SELECT value_text FROM dynamic_field_value
#WHERE object_id = $_
#AND field_id = 80";


}