Foro - Perl en Español

por **danimera** » 2008-10-18 17:24 @767

Me gustaría saber la forma óptima de unir dos array y que me queden en un hash, es decir, los datos del primer array serán las llaves y los del segundo las claves...

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

@array1=('nombre','edad','pais');
@array2=('fernado','17','peru');

%hash{
'nombre'=>'fernado',
'edad'=>'17',
'pais'=>'peru'
}
Coloreado en 0.002 segundos,  usando GeSHi 1.0.8.4

El problema es que nunca sabré cuáles y cuántos son los campos que traerá cada array, lo único que sé es que el número de índices será lo mismo para los dos.

Si vieras el código fuente del método List::MoreUtils::zip(), te darías cuenta de que son dos líneas... de las que interesantes solo es una... así que puedes hacer dos cosas:

* Copiar su método en tu programa (y repetirlo en el resto de programas)
* Usar List::MoreUtils::zip(), convencido de su eficiencia

Y no... no se me ocurre otra forma más eficiente que la que el módulo utiliza.

por **danimera** » 2008-10-18 21:27 @935

Jjajaja, no pues... sí se te ocurrió... en vez de usar el módulo pues copiar el método... jejeje, gracias ^^

por **kidd** » 2008-10-20 07:51 @369

¿Qué tal usando un hash slice?

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my@array1=('nombre','edad','pais');
my@array2=('fernado','17','peru');

my%hash;

@hash{@array1}=@array2;Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

La ventaja es que no te obliga a usar un módulo externo. Ya sabes, hay más de una manera de lograr las cosas en Perl.

Saludos

por **danimera** » 2008-10-25 00:13 @050

Kid, cómo rayos podría yo imaginarme eso, ¿ha...? en sueños... de lo que estaba seguro es que podría lograrlo de otra forma... en Perl siempre es posible eso. Gracias.

por **DAM** » 2008-10-28 14:23 @641

Otra forma sencilla podría ser esta:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

my@array1=('nombre','edad','pais');
my@array2=('fernado','17','peru');

my%hash;
foreachmy$clave(@array1){$hash{$clave}=shift@array2}Coloreado en 0.001 segundos,  usando GeSHi 1.0.8.4

por **danimera** » 2008-11-03 09:09 @423

Gracias DAM... es buena esa manera; la usé pero estaba buscando una forma más óptima de hacerlo.

Foro - Perl en Español

Cómo unir dos array en un hash

Cómo unir dos array en un hash

Publicidad

¿Quién está conectado?