@vorkommen = ( $TEXT=~ /<td>([^"]*)<\/td>/g);