Discussion :

[schnecke]

Bonjour !
je voudrais trier une liste de listes du type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
@maliste = (['a', ['a1','a2','a3']],
['c', ['c1', 'c2', 'c3']],
['b', ['b1', 'b2', 'b3']]
);

afin d'obtenir :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
@resultat = (['a', ['a1','a2','a3']],
['b', ['b1', 'b2', 'b3']],
['c', ['c1', 'c2', 'c3']]
);

càd, trier les sous listes selon leur premier élément.

J'ai essayé ça qui me parait logique mais qui ne fonctionne pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

@resultat = sort {$maliste[$a]->[0] cmp $maliste[$b]->[0]} @maliste;

Une idée ?

[le troll Hebus]

est-ce que je me trompe en disant qu'un simple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sort @maliste

va le forcer à trier sur le premier élément de chaque liste?

[le troll Hebus]

je me trompais, ça ne marche pas...

il fallait faire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

@resultat = sort {$$a[0] cmp $$b[0]} @maliste;

[schnecke]

Oui super !!!

mais je vois pas trop pourquoi mon idée à moi ne marchait pas...
Si tu pouvais essayer d'expliquer le $$a, ce serait vraiment sympa!

En tous cas merci beaucoup, t'es un ange!

[le troll Hebus]

en fait quand tu fais:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
my @liste = (b, c, a);
my @resultat = sort @liste;

tu fais implicitement:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
my @resultat = sort{$a cmp $b} @liste;

avec $a et $b qui représentent, itérativement, le contenu de @liste;
ainsi, $a prend successivement les valeur b, c et a.
Dans ton cas, ce que tu as à la place de b, c et a ce sont des tableaux anonymes ($a et $b représentent les références de ces tableaux): si tu compares $a cmp $b, tout ce que tu vas faire, c'est comparer les chaînes ARRAY(0x....) qui représentent les adresses mémoires de tes tableaux. Pour avoir le premier élément de chacun de ces tableaux, il faut donc comparer $$a[0] et $$b[0]

[schnecke]

Merci d'avoir pris le temps pour l'explication.
J'avais bien compris pourquoi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sort{$a cmp $b} @liste

ne fonctionne pas. Ca, ok.
Mais pourquoi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

sort {$maliste[$a]->[0] cmp $maliste[$b]->[0]} @maliste

ne fonctionne pas, là j'ai du mal.
Parce que si j'essaie de printer $maliste[$i]->[0], j'obtiens bien les éléments que je veux comparer... (1er element de chaque sous-liste). Donc a priori, le sort devrait marcher, non?
Peut-être que dans la sub anonyme, il ne faut mettre que des variables standard, et pas de "maliste" ou quoi que ce soit ...

[le troll Hebus]

oui c'est ça, il ne faut pas de $maliste, puisque ce sont les $a et $b qui font référence aux éléments de @maliste.