[Perl] sort et tri multiple !

sort et tri multiple ! [Perl] - Perl - Programmation

Marsh Posté le 24-02-2005 à 17:33:32    

Bonjour, je ne maîtrise pas du tout la fontion "sort" de Perl mais je souhaiterai faire un tri multiple. J'ai un tableau (@pl) qui contient des lignes du genre:

Code :
  1. SWITCH1_SYSTEMS:Alpha2:*1647205
  2. SWITCH2_SYSTEMS:Alpha2:*2323289
  3. SWITCH1_SYSTEMS:Alpha2:*3014730
  4. SWITCH2_SYSTEMS:Alpha2:*3437270


 
le nombre apres le caractere "*" correspond à un temps. Bref je souhaite obtenir un tri multiple d'abord sur le nom du switch (tri alphabetique) puis sur le temps (tri numérique) de manière otpimisé.
Le nom du switch se situe avant le premier caracère ":" et le temps apres le caractère "*". Jsais pas si c'est clair mais voici un exmple de tri simple (chronologique) avec mes variables:

Code :
  1. @pltrie=sort {
  2. ($reste,$u)=split(/\*/,$a);
  3. ($reste,$v)=split(/\*/,$b);
  4. return $u<=>$v;
  5. }@pl;


Si vous avez des solutions à proposer plz   ;)

Reply

Marsh Posté le 24-02-2005 à 17:33:32   

Reply

Marsh Posté le 03-03-2005 à 10:57:24    

finalement j'ai trouvé une autre méthode :)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed