• Publicidad

Recorrer array

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Recorrer array

Notapor dacons » 2006-05-02 12:05 @545

Hola a todos, ¿hay alguna manera de recorrer este vector con alguna estructura repetitiva, pero sin utilizar variables auxiliares?
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. @elementos = ( "coche", "bici", "moto", "camión", "avión", "cama", "boligrafo", "goma", "papel", "moneda" );
  2.  
  3. sub recorre {
  4.     foreach $elem (@elementos) {
  5.         print $elem;
  6.     }
  7. }
  8. &recorre;
  9.  
Coloreado en 0.006 segundos, usando GeSHi 1.0.8.4
dacons
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-02-27 04:15 @219

Publicidad

Notapor dacons » 2006-05-02 12:10 @549

Se me olvidó, ¿qué es lo que hace <STDIN> en un vector? Por ejemplo:

@vector = <STDIN>;
dacons
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-02-27 04:15 @219

Notapor kidd » 2006-05-02 12:23 @558

Hola.

Acerca de la primera pregunta, no sé a qué te refieres con variable auxiliares, pero quizá busques algo así:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. my @elementos = ( "coche", "bici", "moto", "camion", "avion", "cama", "boli", "goma", "papel", "moneda" );
  2.  
  3. foreach (@elementos) {
  4.     print;
  5. }
  6.  
  7. #O la versión one-liner
  8. print for @elementos;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4

Aunque no es necesario, a mi me gusta hacer el print() con el $_ por motivos de claridad:
Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. foreach(@elementos){
  2.     print $_;
  3. }
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4


Ahora, en cuanto a tu segunda respuesta. Según sé, cuando pides el <STDIN> en un contexto de array, cada línea que ingreses es un elemento del array hasta que teclees <control>D para terminar de ingresar líneas.


Saludos
Uriel Lizama Perl programmer fundador de Perl en Español
Perl Programming Language
Avatar de Usuario
kidd
Creador de Perl en Español
Creador de Perl en Español
 
Mensajes: 1166
Registrado: 2003-10-15 16:52 @744
Ubicación: México


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: Bing [Bot] y 1 invitado

cron