Foro - Perl en Español

Hola a todos:

Estoy en un dilema que no es precisamente de Perl, pero como en eso es lo que programo espero me podáis ayudar. Tengo que resolver el siguiente problema: hallar todas las combinaciones posibles (pero sin permutaciones) de una matriz no regular. O sea, teniendo

Código: Seleccionar todo

S  V  V
T  A  L
H

Tengo que dar todas las combinaciones posibles, ejemplo :

Código: Seleccionar todo

SVV
SVL
TAV

y así sucesivamente. Claro que en este ejemplo es relativamente fácil, porque son solo 12 combinaciones. Una solución que funciona es poner tres ciclos anidados que vayan combinando de atrás hacia delante, pero si tuviese 30 columnas tendría ¡30 ciclos anidados! y eso no me parece muy limpio.
¿Alguna sugerencia?

Esto tiene alguna regla?

STH es una combinacion valida?

Si lo es, sólo tienes que recorrer la matriz (poniendolo en un array, claro) y combinar uno por uno:

DATO1: [1, 0], [1, 1], [1, .....]
DATO2: [2, 0]....

Un sub para meter todo en un array o, merjor aun, en un hash y otro para recorrerlo y sacar datos por cada fila y columna.

Seguí el consejo de explorer y opté por los 30 bucles anidados: como sea resuelve el problema.
Gracias a todos los amigos que sugirieron.
Lirsum