if ($utfzeile =~ m/\"(.*)\"/) { $anfstr = index($utfzeile,$hochkomma,0); $endstr = index($utfzeile,$hochkomma, $anfstr +1); $laenge = $endstr - $anfstr; $teilzeile = substr($utfzeile,$anfstr, $laenge);