Naja, Dein gezeigter Code zeigt ja nur ein Fragment und ist alleine nicht lauffähig. Beispieldaten liegen uns auch nicht vor. Von daher ist dein Problem ohne Aufwand nur schwer nachzuvollziehen.

Der Algorithmus, wie "anhand der Tabelle" die Paarungen zusammengestellt werden sollen, bleibt uns auch verborgen. Auch bleibt unbekannt, wie sich das Freilos auswirkt. Der Spieler, der gegen das Freilos spielt, gewinnt automatisch? Wer bestimmt, wer das Freilos erhält?

Suchst Du evtl. Array-Permutationen?
Dann siehe http://perldoc.perl.org/perlfaq4.html#How-do-I-per...