foreach(@eintraege){
  opendir $ordner,$para1;
  $zaehler++;
}