Foro - Perl en Español

por **esse** » 2009-02-03 23:36 @025

Hola, tengo una duda, quisiera que me pudieran ayudar ya que tengo lo siguiente:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my%clientes=(

   nombre =>"Juan",

   direccion =>"framboyanes 17",

   numeros =>["5551234132","5551172314"],
);
my@telefonos=($clientes{numeros});Coloreado en 0.004 segundos,  usando GeSHi 1.0.8.4

Pero cuando hago un foreach() a teléfonos me imprime la dirección de memoria (ARRAYx012345)

¿Cómo puedo hacerlo? GRACIAS

¡Hola!

Pues es normal que te imprima la memoria porque es eso mismo lo que le dices con el la igualación del array, ya que le dices que te ponga en el array dónde está el número, pero no lo que quieres, que es que te ponga el número en sí que están dentro del array dentro de hash.

Prueba esto:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

use Data::Dumper;
my%clientes=(

   nombre =>"Juan",

   direccion =>"framboyanes 17",

   numeros =>["5551234132","5551172314"]);

print"numeros -> @{ $clientes{'numeros'} }\n";Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Fíjate en el print() y la @ que lleva delante el hash, eso es para decirle que todo lo que pertenezca a la key 'numeros' va a ser un array, con lo que no devolverá un valor asociado, sino un array de valores.

¡Espero que te sirva!

por **explorer** » 2009-02-04 04:36 @233

Prueba con

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my%clientes=(

   nombre =>"Juan",

   direccion =>"framboyanes 17",

   numeros =>["5551234132","5551172314"],
);

my$telefonos_ref=$clientes{numeros};Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Ahora, $telefonos_ref contiene una referencia a los números de teléfono del cliente.

Para presentarlos, como decía Sombrerero_Loco, hay que acceder al arreglo que se encuentra allí escondido:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

formy$telefono(@$telefonos_ref){
print"Teléfono: $telefono\n";
}Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Sale:

Código: Seleccionar todo: Teléfono: 5551234132 Teléfono: 5551172314

Básicamente, es la misma notación que la que Sombrerero_Loco te ha indicado.

por **Sombrerero_Loco** » 2009-02-04 05:06 @254

Explorer, la tuya es mejor si lo que quiere es que salga en diferentes líneas, la mía salía todo en la misma línea

por **explorer** » 2009-02-04 05:32 @272

Bueno, así esse tiene más posibilidades... ya sabemos que en Perl "hay más de una forma de hacerlo".

Y eso es lo más importante en nuestro lenguaje, a diferencia de otros, en los que solo hay una posibilidad.

por **esse** » 2009-02-04 20:49 @909

MUCHAS GRACIAS, ha sido muy buena su ayuda

Foro - Perl en Español

Hash y arreglos

Hash y arreglos

Publicidad

¿Quién está conectado?