Tri d'un tableau 2D sans la fonction sort

Bonjour,

Je cherche un petit coup de main pour m'aider à trier un tableau 2D selon la "3ème" colonne (l'heure) sans utiliser un seul module perl.

mon tableau est sous la forme:

Citation:

---

Nom Date heure
toto 23/03/2011 12:44:34
tata 23/03/2011 12:44:56
totu 23/03/2011 12:43:23
titi 23/03/2011 12:45:01
...

---

j'ai à ma disposition une fonction permettant de faire un comparaison de l'heure nommé compare_nmc_date()

J'ai donné un élément de réponse ici, en utilisant la transformée Schwarzienne.

A noter au passage que la fonction sort est native en perl, elle ne fait appel à aucun module (ni du CPAN, ni du Core).

Merci Philou67430,

Je vais regarder cela.
Pour le sort j'y ai même songé étant donné l'age du perl installé sur la machine que je doit utiliser (perl 5.005)


Mais en fait cela semble fonctionner, donc je vais faire cela.


Merci

Trouvé,

La fonction sort fonctionne nickel.

Voici mon code:

Code:

---

1 2 3 4 5 6 7 8

@result = sort { $a->[2] <=> $b->[2] } @result   print "NE\tDate\tHeure\n"; for (my $i=0; $i<$size; $i++) { print $result[$i][0]."\t".$result[$i][1]."\t".$result[$i][2]."\n"; }

---

Citation:

---

Envoyé par mamax29

La fonction sort fonctionne nickel.

---

Je n'ai pas dit autre chose ;)

NB: il manque un point virgule à la fin de la première ligne 8-)