Discussion :

[schnecke]

Bonjour!

voilà ma liste:

Code :

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

@liste=qw(a d b f é à c);

Je voudrais trier cette liste de manière lexicographique, pour obtenir

Code :

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

a à b c d é f

Je sais qu'il y a le tri asciibetique en perl, mais ce n'est pas ce que je veux, puisqu'il me mettrait 'à' et 'é' en fin de liste.

Bien-sûr je peux toujours remplacer 'à' et 'é' par 'a' et 'e', mais je cherche une meilleure solution.
Ce que je voudrais c'est définir exactement l'ordre à utiliser et que la fonction sort et les opérateurs gt, lt utilisent cet ordre.

Une idée ?

[le troll Hebus]

tu peux toujours essayer de définir une routine de tri:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
#!/usr/bin/perl
 
use strict;
 
my @list = ('e', 'a', 'é', 'è', 'à');
 
sub tri {
    my %hash_tri = ();
    $hash_tri{'a'} = 1;
    $hash_tri{'à'} = 2;
    $hash_tri{'e'} = 3;
    $hash_tri{'é'} = 4;
    $hash_tri{'è'} = 5;
 
    $hash_tri{$a} <=> $hash_tri{$b};
}
 
my @list_tri = sort tri @list;
 
 
print STDERR "non trié: @list\n";
print STDERR "trié: @list_tri\n";

par contre, cela oblige de définir l'ordre de tous les caractères qu'on est susceptible de rencontrer.

[Jedai]

A priori, un petit "use locale;" au début de ton script pourrait t'aider, sinon si ta locale est mal configurée, tu devras te plonger un peu plus avant dans les arcanes du système de gestion des locales perl.
Pour le sort, tu pourrais toujours utiliser une fonction de tri, je suppose que tu sais comment faire ??

--
Jedaï

[schnecke]

Avec "use locale", ca marche nickel.
Je vois pas trop pourquoi, ni comment mais ca me trie bien tout comme je veux.
Merci beaucoup.

Merci aussi pour la routine de tri, ca pourra toujours me servir.