@vorkommen = ( $text =~ m/(Anfang.*?Ende)/g );