strstr($mail,array("!","#","%","&","(",")","@",",","/"))

この書き方ってできなかったっけ?