open(INFO2, "$datei2"); @liste = ; close(INFO2);