ereg y preg_match

[markmb]

Estaba probando unas cosas con un código, que funcionaba bien, pero (tengo en local los errores al máximo) me dice que la función ereg está "Deprecated". Para no tener problemas en el futuro, he buscado una función parecida, y he encontrado preg_match, pero me da error:

Warning: preg_match(): Unknown modifier '@' (en la línea 2)

El código con preg_match es este, que es el mismo que con ereg:

Código PHP:

  function validacorreo ($email){
    if (!preg_match("^[^@]{1,64}@[^@]{1,255}$", $email)){
        return false;
    }
    $email_array = explode("@", $email);
    $local_array = explode(".", $email_array[0]);
    for ($i = 0; $i < sizeof($local_array); $i++) {
        if (!preg_match("^(([A-Za-z0-9!#$%&'*+/=?^_`{|}~-][A-Za-z0-9!#$%&'*+/=?^_`{|}~\.-]{0,63})|(\"[^(\\|\")]{0,62}\"))$", $local_array[$i])) {
            return false;
        }
    } 
    if (!preg_match("^\[?[0-9\.]+\]?$", $email_array[1])){ 
        $domain_array = explode(".", $email_array[1]);
        if (sizeof($domain_array) < 2) {
            return false;
        }
        for ($i = 0; $i < sizeof($domain_array); $i++){
            if (!preg_match("^(([A-Za-z0-9][A-Za-z0-9-]{0,61}[A-Za-z0-9])|([A-Za-z0-9]+))$", $domain_array[$i])){
            return false;
            }
        }
    }
return true;
}  
   

Alguien sabe alguna función idéntica a ereg, o como arreglar ese error?

Edito: no puedo usar preg_match porque en el remoto no tengo PERL, acabo de verlo.

[pateketrueke]

por favor... no necesitas PERL para ejecutar preg_match(), ¿ya leíste el manual??

la única diferencia son los delimitadores y modificadores.... por favor, lee antes...
http://www.forosdelweb.com/f18/aport...s-pcre-646110/

[markmb]

No lo leí, lo hojee, y vi: PCRE — Regular Expressions (Perl-Compatible) y ahí me quedé. Si me dices que no necesito PERL, me lo voy a leer mejor.

[abimaelrc]

¿Qué versión de PHP está instalada en el remoto? Además no necesitas PERL para correr los PCRE. Corre un código sencillo en el remoto para que veas.

[markmb]

Iniciado por abimaelrc

¿qué versión de php está instalada en el remoto? Además no necesitas perl para correr los pcre. Corre un código sencillo en el remoto para que veas.

5.2.10

[abimaelrc]

No debes tener dificultades usando la librería de PCRE.

[markmb]

Con uno de los ejemplos que me ha pasado antes, funciona perfectamente.

[markmb]

Ya estoy con la "transcripción" (soy cabezón y no voy a buscar nuevos ejemplos, voy a modificar este):

"^[^@]{1,64}@[^@]{1,255}$"

El operador ^@, quiere decir cualquier carácter excepto @ o espacio. Cómo puedo ponerlo en PCRE?

[Nisrokh]

Código PHP:

<?php
 
preg_match('/^[^@]{1,64}@[^@]{1,255}$/', $subject);
 
?>
 

[markmb]

Siempre me pasa lo mismo, me miro los manuales a la mitad. Ahora ya funcionan, lo único que me faltaba en todos era el carácter / al principio y al final. Gracias a todos!!