Utilizziamo una espressione regolare:

if (eregi(“^([a-z0-9]|\\-|\\.)+@(([a-z0-9]|\\-)+\\.)+[a-z]{2,4}$”, $string))

Il controllo che viene fatto è ovviamente solo “grammaticale”, ovvero riconosce come valide mail con caratteri validi e dominio di primo livello tra le 2 e le 4 lettere.