open (CSV,"<", $datei) or die $!;