@inhalt =();
  @inhalt = <$verz/*.*>;
  for(@inhalt){
    $list->insert('end',$_);
  }