Foro - Perl en Español

por **desdechina** » 2013-02-11 07:11 @341

Hola.

Estoy estudiando expresiones de cadenas y operadores de cadenas y me atasco un poco, bueno, bastante.
A ver si podéis echarme una mano

my @results = split(/<\/td>/,$tempstring)
Usa como separador la expresión </td>

/<td \/>.*<tr><td>(.*)/

<td />una cadena <tr><td>otra cadena

/.*<td>([0-9]+\.[0-9]+)<b>(.*)<\/b>.*/
.* : una cadena

([0-9]+\.[0-9]+) : Un número de uno o más dígitos, seguido de punto, seguido de otro número de uno o más dígitos
<b> = <b>
(.*) : una cadena
<\/b> = </b>
.* : una cadena

¿Qué tal lo llevo?

A veces una coincidencia mínima puede ser de gran ayuda. Suponga que desea buscar todo lo que hay entre "mesa" y "come". Para empezar, lo intenta con:

$_ = "En la mesa, al mediodía, se come, y en el comedor se cena.";
if ( /mesa(.*)come/ ) {
print "se obtiene <$1>\n";
}

del que, inesperadamente, resulta:

se obtiene <, al mediodía, se come, y en el >

Esto se debe a que ".*" es avaricioso, por lo que obtiene todo lo que hay entre la primera instancia de "mesa" y la última instancia de "come". Aquí es más eficaz utilizar una coincidencia
mínima para asegurarse de obtener el texto entre una instancia de "mesa" y la primera instancia de "come" que haya a continuación.

if ( /mesa(.*?)come/ ) { print "obtiene <$1>\n" }

obtiene <, al mediodía, se >

Foro - Perl en Español

Trabajando con cadenas

Trabajando con cadenas

Publicidad

Re: Trabajando con cadenas

¿Quién está conectado?