open(DAT,'<',$datei) or die "Fehler ($!)"