open (DATEI, "Adressen") or die "Kann Datenquelle nicht finden/oeffnen: $!\n";
flock (DATEI, 2);
@array = <DATEI>;
close (DATEI);