foreach $allefile (@allefiles)
{
open (ZWEITE,">>/var/lib/testverzeichnis/k_loesch/loeschtxt/$mydate.txt");
  print ZWEITE "$allefile";								
close (ZWEITE);
}