Php regular expression code used to filter html tags, spaces, and line breaks (appendix)

The most common regular expression filtering code can help you filter excess carriage return, comments, html tags, and so on. The code is as follows:
$ Str = preg_replace ("// \ s +/", "", $ str); // filter excess carriage returns
$ Str = preg_replace ("/<[] +/si", "<", $ str); // filter <__( "<" followed by a space)

$ Str = preg_replace ("/<\! --.*? -->/Si "," ", $ str); // comment
$ Str = preg_replace ("/<(\!. *?)> /Si "," ", $ str); // filter DOCTYPE
$ Str = preg_replace ("/<(\/? Html. *?)> /Si "," ", $ str); // filter html tags
$ Str = preg_replace ("/<(\/? Head. *?)> /Si "," ", $ str); // filter head tags
$ Str = preg_replace ("/<(\/? Meta. *?)> /Si "," ", $ str); // filter meta Tags
$ Str = preg_replace ("/<(\/? Body. *?)> /Si "," ", $ str); // filter the body tag
$ Str = preg_replace ("/<(\/? Link. *?)> /Si "," ", $ str); // filter link tags
$ Str = preg_replace ("/<(\/? Form. *?)> /Si "," ", $ str); // filter form labels
$ Str = preg_replace ("/cookie/si", "COOKIE", $ str); // filter COOKIE tags

$ Str = preg_replace ("/<(applet. *?)> (.*?) <(\/Applet. *?)> /Si "," ", $ str); // filter the applet tag
$ Str = preg_replace ("/<(\/? Applet. *?)> /Si "," ", $ str); // filter the applet tag

$ Str = preg_replace ("/<(style. *?)> (.*?) <(\/Style. *?)> /Si "," ", $ str); // filter style labels
$ Str = preg_replace ("/<(\/? Style. *?)> /Si "," ", $ str); // filter style labels

$ Str = preg_replace ("/<(title. *?)> (.*?) <(\/Title. *?)> /Si "," ", $ str); // filter the title tag
$ Str = preg_replace ("/<(\/? Title. *?)> /Si "," ", $ str); // filter the title tag

$ Str = preg_replace ("/<(object. *?)> (.*?) <(\/Object. *?)> /Si "," ", $ str); // filter object tags
$ Str = preg_replace ("/<(\/? Objec. *?)> /Si "," ", $ str); // filter object tags

$ Str = preg_replace ("/<(noframes. *?)> (.*?) <(\/Noframes. *?)> /Si "," ", $ str); // filter noframes tags
$ Str = preg_replace ("/<(\/? Noframes. *?)> /Si "," ", $ str); // filter noframes tags

$ Str = preg_replace ("/<(I? Frame. *?)> (.*?) <(\/I? Frame. *?)> /Si "," ", $ str); // filter frame labels
$ Str = preg_replace ("/<(\/? I? Frame. *?)> /Si "," ", $ str); // filter frame labels

$ Str = preg_replace ("/<(script. *?)> (.*?) <(\/Script. *?)> /Si "," ", $ str); // filter script tags
$ Str = preg_replace ("/<(\/? Script. *?)> /Si "," ", $ str); // filter script tags
$ Str = preg_replace ("/javascript/si", "Javascript", $ str); // filter script tags
$ Str = preg_replace ("/vbscript/si", "Vbscript", $ str); // filter script tags
$ Str = preg_replace ("/on ([a-z] +) \ s * =/si", "On \ 1 =", $ str ); // filter script tags
$ Str = preg_replace ("// & #/si", "& #", $ str); // filter script tags, such as javAsCript: alert (