Foro - Perl en Español

Publicado: **2014-10-21 18:22 @807**

Pues... tampoco

La exp. reg. sigue siendo lo más lento.

He actualizado el mensaje anterior, y puedes ver que la exp. reg. es la mitad de rápida que split() y la cuarta parte que index() (o dicho de otro modo, que index() es cuatro veces más rápida).

Publicado: **2014-10-22 03:47 @199**

Cierto, yo antes lo había probado sin asignar el resultado a $msg_error, dando por hecho que iba a trabajar con $1.

El mismo código poniendo solo:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

$texto =~ /\)(.*)/;
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

Salida:

Sintáxis: [ Descargar ] [ Ocultar ]

red@red-MS-1034:~/Escritorio$ perl debug.pl
Rate split regex index
split 1008498/s -- -6% -56%
regex 1072273/s 6% -- -53%
index 2296676/s 128% 114% --

Foro - Perl en Español

Obtener mensaje de una cadena de texto

Re: Obtener mensaje de una cadena de texto

Re: Obtener mensaje de una cadena de texto