Cleaning email arrays in CF

test.cfm

<cffunction name="cleanEmails">
    <cfargument name="toStr">

    <cfset local.tempArr = ListToArray(arguments.toStr)>
    <cfset local.newArr = []>

    <cfloop array="#local.tempArr#" index="local.email">
        <cfset ArrayAppend(local.newArr, trim(lcase(local.email)))>
    </cfloop>

    <cfreturn unique(local.newArr)>
</cffunction>

<cffunction name="unique">
    <cfargument name="arr">

    <cfset local.newArr = []>

    <cfloop array="#arguments.arr#" index="local.i">
        <cfif !ArrayContains(local.newArr, local.i)>
            <cfset ArrayAppend(local.newArr, local.i)>
        </cfif>
    </cfloop>
    
    <cfreturn local.newArr>
</cffunction>

<cffunction name="removeDupes">
    <cfargument name="current">
    <cfargument name="master">

    <cfset local.newArr = []>

    <cfloop array="#arguments.current#" index="local.email">
        <cfif !ArrayContains(arguments.master, local.email)>
            <cfset ArrayAppend(local.newArr, local.email)>
        </cfif>
    </cfloop>

    <cfreturn local.newArr>
</cffunction>

<cftry>
    <cfset local.to = "[email protected], [email protected],  [email protected]  ,[email protected]">
    <cfset local.cc = "[email protected],no<a>@valid.com">
    <cfset local.bcc = "[email protected],[email protected]">

    <cfset local.toArr = cleanEmails(local.to)>
    <cfset local.ccArr = cleanEmails(local.cc)>
    <cfset local.bccArr = cleanEmails(local.bcc)>

    <cfset local.ccArr = removeDupes(local.ccArr, local.toArr)>
    <cfset local.bccArr = removeDupes(local.bccArr, local.toArr)>
    <cfset local.bccArr = removeDupes(local.bccArr, local.ccArr)>

    <cfdump var="#local.toArr#">
    <cfdump var="#local.ccArr#">
    <cfdump var="#local.bccArr#">

    <cfcatch>
        <cfdump var="#cfcatch#">
        <cfabort>
    </cfcatch>
</cftry>