Foro - Perl en Español

Hola a todos,

Estoy trabajando con dos hash, cada uno con 9 campos que son usados como llave (key). El principal ($Hash), me sirve para mantener una serie de valores clasificados por la llave global (los 9 campos anteriores). El segundo hash ($SubStats), es un hash temporal que contiene la información necesaria para poder actualizar el hash principal.



El caso es que quisiera mantener y actualizar el hash principal, ($Hash) pero sin tener en cuenta si las "keys" de $SubStats están en mayúscula o en minúsculas (NO case-sensitive).

Dicho de otra forma: si una key de $SubStats esta en minúsculas (por ejemplo 'esp' ), y en el hash principal (Hash), ya existe una entrada donde todas las keys son iguales pero la key correspondiente está en mayúsculas ('ESP'), quisiera que fuera tomada como si de mayúsculas se tratara.

Y lo mismo para el caso inverso.
No sé si mi mensaje es lo bastante claro...

Lo que yo había pensado hacer:



Es decir, añadir marcadores "case insensitive" para cada llave. ¿Alguien ve alguna pega en dicha solución?

Gracias por cualquier consejo,
Un saludo,
Felipe

Debes decidir si las claves de %Hash serán en mayúscula o minúscula.

Luego, cuando pongas las claves en %SubStats, pon las claves bajo las funciones lc() o uc() para asegurarte que las claves son de un sentido o de otro.

Le pega de tu solución: las operaciones de coincidencia no sirven como operaciones de transformación. Transformar algo en mayúscula o minúscula se hace de otras formas (5 o 6 formas distintas), pero no con operaciones de coincidencia.

Te recomiendo que prendas una fogata y hagas un baile implorando a los dioses de Perl, y verás como con un poco de magía puedes hacer tu propia versión de como un hash debería de funcionar.

Usando el módulo Tie::Hash puedes hacer tus hashes personales y lograr justamente lo que quieres sin la necesidad de cambiar algo en tu código original, el tutorial lo puedes ver en la siguiente liga:
http://perlenespanol.com/tutoriales/fun ... ashes.html


Saludos