What do you mean "no longer working"?
Tokencount works and you can use it to validate email address format, but you need to create several conditions:
tokencount(emailText, "@")=1
tokencount(emailText, ".")>0
tokencount(emailText, ",")=0
tokencount(emailText, " ")=0
etc.
Those are some basic checks, if you need a more strict validation, you can create a string of all characters that are not allowed in email and do something like this:
charList="`:;'<>,/?\" <-- this is just an example, not the actual list of restricted characters
For x=0 to len(charList)-1
tokencount(emailText, mid(charList,loopindex,1))=0
[/code:1sinvf5u]