chi mi sa consigliare una funzione per intercettare le bad words che assegno in una lista o variabile ?

una cosa del genere ce l'ho in asp, se qualcuno č bravo con le espressioni regolari

codice:
	strMessage = request("Comments")
	Set regEx = new RegExp
	regEx.Pattern = "micio|pluto|paperino|paperone"
	regEx.IgnoreCase = True
	regEx.Global = True
	Set Matches = regEx.Execute(strMessage)
	
	MyFound = 0

	For Each Match in Matches
		MyFound = 1
	Next