Foro - Perl en Español

por **enana** » 2011-03-28 12:03 @544

Hola, necesitamos ayuda para descargar una hash. Tenemos unas mil keys, cada una con varios values cargadas en un hash, pero no sabemos cómo descargar los values, ya que nos pinta únicamente los values de la última key para todas las keys.

Este es el código que estamos utilizando:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

foreach my $key1(keys %$estructura)
    { 
        foreach  $value (values %$estructura)
            {
                @value=@$value;
            }
        print "$key-> @value";
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

¡¡¡Gracias!!!

my $estructura = {
    clave1      => {
                    a => 1,
                    b => 2,
                    c => 3,
    },
    clave2      => {
                    camarzana   => 'solar',
                    delavega    => 'finca',
                    solariego   => 'pisos',
    },
};
 
for my $key1 (keys %{ $estructura }) {
    my @valores = values %{ $estructura->{$key1} };
    print "$key1 -> @valores\n";
}
__END__
clave2 -> finca solar pisos
clave1 -> 3 1 2
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Recordad: Data::Dumper es vuestro amigo:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

use Data::Dumper;
print Dumper $estructura;
Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

Sale:

Sintáxis: [ Descargar ] [ Ocultar ]

Using text Syntax Highlighting

$VAR1 = {

          'clave2' => {

                        'delavega' => 'finca',

                        'camarzana' => 'solar',

                        'solariego' => 'pisos'

                      },

          'clave1' => {

                        'c' => 3,

                        'a' => 1,

                        'b' => 2

                      }

        };Coloreado en 0.000 segundos,  usando GeSHi 1.0.8.4

por **enana** » 2011-03-28 12:35 @566

Muchas gracias por responder tan rápidamente y por la bienvenida.

Tenemos un hash de hash y utilizamos Dumper estructura...

Hemos probado lo que nos propones y nos da el siguiente error:
Type of arg 1 to values must be hash (not hash element) ... , near "})"

Hemos modificado los () y los {} sin resultado...

Tenemos todas las variables inicializadas, etc...

¿Por qué no detecta bien %{$estructura} para los values() pero si en las keys()?

por **explorer** » 2011-03-28 14:40 @653

El mensaje de error dice que la estructura no es como estás diciendo que tiene que ser. El error dice que le estás pasando a values() un elemento de un hash, cuando él está esperando un hash entero.

Dices que has usado el Dumper. Si publicas unas pocas líneas del Dumper, podremos ver la estructura real de la $estructura. Si hay datos sensibles, falséalos.

Foro - Perl en Español

Descargar hash

Descargar hash

Publicidad

Re: Descargar hash

Re: Descargar hash

Re: Descargar hash

¿Quién está conectado?