Problème avec un script qui donne l'ordre croissant d'un tableau.

Bonjour à toutes et à tous,

J'ai trouvé un script qui donne l'ordre croissante d'un tableau. Le script en question est le suivant :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

my @test = qw/2 1 0/; my ($n,$max,@tri,@tri_desc); $max = $test[0];   while(@test){ $_ > $max and $max = $_ for @test; for (@test){ $n++;last if $max == $_} unshift @tri,$max; push @tri_desc,$max; splice(@test,$n-1,1); $n=0; $max = $test[0]; } print "ordre croissante:\t@tri\n";

---

Ce script fonctionne correctement quand le tableau d'entrée est donnée avec ce syntaxe : "my @test = qw/2 1 0/;".
Dans mon cas, le tableau d'entrée est récupérée par une requête MySQL.
Si j'utilise le tableau résultat de ma requête MySQL le script ne marche pas.
Avez-vous une idée ?

Cordalement
Dimitri.

Bonjour, tu récupères bien quelque chose de ta base? as tu essayer de comparer ton tableau résultat de mysql juste pour voir la différence?

Voici un script de tri qui marche quel que soit le nombre d'éléments en entrée:

Code:

---

1 2 3 4

my @test = qw/2 1 0/; my @sorted = sort {$a <=> $b} @test; print "@sorted \n";

---

Sinon, donne-nous le tableau résultat de la requête SQL, on pourra alors certainement te dire ce qui ne marche pas.

Citation:

---

Envoyé par Lolo78

Voici un script de tri qui marche quel que soit le nombre d'éléments en entrée:

Code:

---

1 2 3 4

my @test = qw/2 1 0/; my @sorted = sort {$a <=> $b} @test; print "@sorted \n";

---

Sinon, donne-nous le tableau résultat de la requête SQL, on pourra alors certainement te dire ce qui ne marche pas.

---

Bonjour,

Merci pour ta réponse lolo78.
Le tableau résultat de la requête SQL a cette tête à l'affichage : 2 1 0.
Comment dois-je faire pour passer ce tableau en entrée sur ce script :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

my @test = qw/2 1 0/; my ($n,$max,@tri,@tri_desc); $max = $test[0];   while(@test){ $_ > $max and $max = $_ for @test; for (@test){ $n++;last if $max == $_} unshift @tri,$max; push @tri_desc,$max; splice(@test,$n-1,1); $n=0; $max = $test[0]; } print "ordre croissante:\t@tri\n";

---

La valeur de la variable @test doit être le tableau résultat de la requête SQL.
Actuellement la variable @test un une valeur en dur.
Je ne sais pas si je suis clair à mes explications.

Merci beaucoup
Dimitri.

Si ta requête SQL te renvoie un tableau, il suffit de faire le tri sur ce tableau.

Je ne vois pas ce que je peux dire de plus. Montre le code effectuant la requête si tu veux plus d'aide sur une bonne façon de le faire. Mais, en gros, l'idée est la suivante:

Code:

---

1 2 3

my @result = requete_sql(); my @sorted_result = sort {$a <=> $b} @result;

---

Citation:

---

Envoyé par Lolo78

Si ta requête SQL te renvoie un tableau, il suffit de faire le tri sur ce tableau.

Je ne vois pas ce que je peux dire de plus. Montre le code effectuant la requête si tu veux plus d'aide sur une bonne façon de le faire. Mais, en gros, l'idée est la suivante:

Code:

---

1 2 3

my @result = requete_sql(); my @sorted_result = sort {$a <=> $b} @result;

---

---

Bonjour Lolo78,

Finalement j'ai trouvé. C'était quelque-chose de tout bête. Le tableau que j'ai récupéré de ma requête était correctement affiché mais je l'envoyer vide au module d'après. Il fallait faire une commande push pour le remplir, puis ensuite l'envoyer au module d'après.
Merci vous m'avez aider beaucoup.

Cordalement
Dimitri.