Lo penso necessità di cambiarla a questa:
se (! eregi (“^ [_a-z0-9-] + (\. [_a-z0-9-] +) *@ [a-z0-9-] + (\. [a-z0-9-] +) * (\. [a-z] {2.4}) $„, $customer_eMail))
Notare l'ultima parte, io pensano che questo la ingrandica a 4 caratteri. Poichè lo avete, rifiuta tutta l'estensione dei 4 caratteri.