while (my $tmp = <OEFFNEN>) {
		push @zeilen, $tmp;		
	}