while( my $entry = readdir DIR )
{
  push @liste_gesammt, $entry;
}