Foro - Perl en Español

por **creating021** » 2007-07-24 16:50 @743

Bueno, me topé con un problema que no tratan en Learning Perl. Es el siguiente:

Yo sé que para tomar el último valor de un array se usa

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

$ultimo=$array[-1];Coloreado en 0.003 segundos,  usando GeSHi 1.0.8.4

¿Pero qué tal si yo quiero tomar todos los elementos de un array que van del último al penúltimo?

Bueno pensé en algo como:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

@elementos=$array[0..-2]Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

pero no obtengo buenos resultados; si a @array le asigno como elementos 0 al 100 y uso este método @elementos imprime 1:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

use strict;
my@array=(0..100);
my@elementos=$array[0..-2];
printjoin"\n",@elementos;Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

¿Por qué pasa esto y cómo lo puedo arreglar?

Yo creo que pasa lo siguiente: Perl cree que el rango en realidad es un biestable. En la ejecución, como el valor de ejecución del biestable es verdadero, la sentencia se transforma en $array[1], por lo que te devuelve el 1 que está en la segunda posición del array.

Hay algo mal: si quieres obtener más de un valor de un array, debes colocar el sigil '@' delante del nombre de la variable. Si pones un '$', quiere decir que sólo quieres un valor.

Y la expresión de rango siempre va en orden creciente, así que 0..-2 tampoco es válido.

La expresión para obtener los dos últimos valores del array, entonces es:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my@elementos=@array[-2 ..-1];Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Pero además, pides obtener los valores primero el último y luego el penúltimo, así que hay que darles la vuelta:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my@elementos=reverse@array[-2 ..-1];Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

por **kidd** » 2007-07-24 20:12 @883

Hola:

No entiendo porque usar un rango si solamente quieres agarrar el último elemento seguido del penúltimo, mejor tomas los dos elementos:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my@elementos=@array[-1,-2];Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Saludos

por **creating021** » 2007-07-25 15:13 @676

Hola.

Muchas gracias por las respuestas

Foro - Perl en Español

Tomar valores de array[0..-2]

Tomar valores de array[0..-2]

Publicidad

¿Quién está conectado?