Foro - Perl en Español

Ante todo muchas gracias.

Suponiendo que quiero volcar el resultado de una consulta en un hash, y luego ordenar el hash, no por la key sino por el value.

El value se compone de la concatenación de dos campos de la tabla: uno numérico y otro varchar.



Obtenido el hash ahora, ¿cómo lo ordeno por valor cuando quiero RESPETAR en la ordenación el campo numérico que formó la concatenación y ahora ya es un string?



¿Cómo hago para ordenar el resultado de la consulta previa a la concatenación?

Por ejemplo, suponiendo que la consulta devuelva

Código: Seleccionar todo

1 , 11 ,  nombre 1
2,  232 , nombre 2
3,  254 , nombre 3
4, 1,      nombre4

quiero obtener un hash ORDENADO de la siguiente forma: tiene en cuenta el campo numérico de la concatenación:

Código: Seleccionar todo

{  ‘4’ => ’ 1 – nombre4’,
    ‘1’ => ’ 11 – nombre1’,
    ‘2’ => ’ 232 – nombre2’,
    ‘3’ => ’ 254 – nombre3’   }

Muchas gracias

Respuesta inmediata: no se puede. Los hash no se almacenan en un determinado orden. Perl no garantiza el mantenimiento del orden en el almacenamiento o salida de claves o valores. Lo único garantizado es que las funciones keys() y values() devuelven sus valores en el mismo orden (cada clave n-ésima corresponde con el valor n-ésimo).

Respuesta modular: existen módulos, como el Tie::Hash::Sorted que permiten gestionar hash con un determinado orden. Como extra, mira en la sinopsis: hay un ejemplo de cómo ordenar un hash a partir de los valores.

Respuesta clásica: si quieres mantener un orden, usa un array. Eso quiere decir que debes guardar toda la información (claves y valores) como elementos dentro de un array.

Respuesta DB: la ordenación te la puede dar el propio motor de la base de datos, modificando la consulta. Algo como

¡¡¡ GRANDE !!! Explorer

Muchas gracias, lo solucioné con Tie::Hash::Sorted.