Foro - Perl en Español

Necesito ayuda... Tengo un hash en el que almaceno una clave y un valor y al imprimirlo se puede ver por pantalla:

Código: Seleccionar todo

#Codon                           AA
GCT                              A
GCA                              A
GCC                              A
TGT                              C
TGC                              C
ATA                              I
ATC                              I

y bueno, es mucho más amplio.. Se observa, por lo tanto, que el valor me aparece ordenado alfabéticamente (A, C, D, E, F..) pero necesito ADEMÁS (necesito ambos) que el codon también aparezca ordenado (dentro de los que codifican a un mismo aminoácido ordenados alfabéticamente).
Así pues, tendría que obtener

Código: Seleccionar todo

#Codon                          AA
GCA                             A
GCC                             A
GCT                             A
TGC                             C
TGT                             C
ATA                             I
ATC                             I

Observación: Dentro de los que codifican al aminoácido A, estarían ordenados alfabéticamente GCA, GCC,y GCT.

Escribidme el código por favor, que la función sort() me está desesperando.
Gracias.
Gracias de antemano.

Bienvenido a los foros de Perl en español, programando_perl.

En efecto, se trata de ajustar un poco la función sort():

En la función sort(), primero ordenados alfabéticamente por los valores o (||), si éstos coinciden, ordenamos por las claves.

Esta es la forma de encadenar varios criterios de ordenación dentro de sort().
Más ejemplos en perldoc perlfunc sort().

Muchísimas gracias. Funciona perfectamente

Hola,

Cuando quieras ordenar "cosas" por múltiples atributos otra alternativa es usar los módulos Sort::Maker o Sort::Key::Multi.

Yo personalmente (y de forma nada imparcial ) te recomiendo Sort::Key::Multi:



Las principales ventajas de usar estos módulos son por un lado la velocidad y por otro que el código queda más clarito, especialmente cuando las claves de ordenación se "calculan" al vuelo y son complicadas.