uhm ... ti do l'espressione regolare che uso io e che fino ad ora non mi ha mai tradito, prova un po':

codice:
eregi ("^[[:alnum:]][a-z0-9_.-]*@[a-z0-9.-]+\.[a-z]{2,6}$", $value)