TYPO3 / TYPO3.CMS

        $skipTag = false;

        foreach ($tokArrSliced as $tok) {

            if ($inComment) {

                if (($eocPos = strpos($tok, '-->')) === false) {

                    // End of comment is not found in the token. Go further until end of comment is found in other tokens.

                    $newContent[$c++] = '<' . $tok;

                    continue;

                }

                // Comment ends in the middle of the token: add comment and proceed with rest of the token

                $newContent[$c++] = '<' . substr($tok, 0, ($eocPos + 3));

                $tok = substr($tok, $eocPos + 3);

                $inComment = false;

                $skipTag = true;

            } elseif ($inCdata) {

                if (($eocPos = strpos($tok, '/*]]>*/')) === false) {

                    // End of comment is not found in the token. Go further until end of comment is found in other tokens.

                    $newContent[$c++] = '<' . $tok;

                    continue;

                }

                // Comment ends in the middle of the token: add comment and proceed with rest of the token

                $newContent[$c++] = '<' . substr($tok, 0, $eocPos + 10);

                $tok = substr($tok, $eocPos + 10);

                $inCdata = false;

                $skipTag = true;

            } elseif (substr($tok, 0, 3) === '!--') {

                if (($eocPos = strpos($tok, '-->')) === false) {

                    // Comment started in this token but it does end in the same token. Set a flag to skip till the end of comment

                    $newContent[$c++] = '<' . $tok;

                    $inComment = true;

                    continue;

                }

                // Start and end of comment are both in the current token. Add comment and proceed with rest of the token

                $newContent[$c++] = '<' . substr($tok, 0, ($eocPos + 3));

                $tok = substr($tok, $eocPos + 3);

                $tok = substr($tok, $eocPos + 3);

                $skipTag = true;

            } elseif (substr($tok, 0, 10) === '![CDATA[*/') {

                if (($eocPos = strpos($tok, '/*]]>*/')) === false) {

                    // Comment started in this token but it does end in the same token. Set a flag to skip till the end of comment

                    $newContent[$c++] = '<' . $tok;

                    $inCdata = true;

                    continue;

                }

                // Start and end of comment are both in the current token. Add comment and proceed with rest of the token

                $newContent[$c++] = '<' . substr($tok, 0, $eocPos + 10);

                $tok = substr($tok, $eocPos + 10);