Cita:  Mensaje Original por Ferdy  Yo le pondría algo más restrictiva la Reg_Exp de Cluster, algo así valdría:
 
Código:
 $res = ereg(
  '^(a-z0-9_]|\\-|\\.)+'.
  '@'.
  '(([a-z0-9_]|\\-)+\\.)+'.
  '[a-z]{2,4}$',
  $email);
  
 
Salu2.Ferdy
 
      
Je je... me equivoque de Administrador... fue Ferdy 
Saludos a los dos...