use Fcntl;
		open(DATEI, '<'.$dateiname) or die "Kann $dateiname nicht öffnen";
		flock(DATEI, LOCK_SH);