Discussion :

[KuK]

Bonjour,

Imaginons un script de ce type :

Code :

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

1
2
3
4
5
6
7
8
9
#!/usr/bin/perl    
use warnings;
use strict;
 
my %HASH;    
 
$HASH{'ClefA'}{'Nombre'} = "61";    
$HASH{'ClefB'}{'Nombre'} = "50";    
$HASH{'ClefC'}{'Nombre'} = "92";

Je voudrais pouvoir trier sur la valeur de 'Nombre' et avoir un retour du type

Code :

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

1
2
3
92     ClefC    
61     ClefA    
50     ClefB

(Un tri descendant/ascendant a la rigueur, peu m'importe)

Sauf, que je n'arrive pas a effectuer un sort sur les valeurs de mon Hash

Je suis un peu perdu
Auriez vous un petit coup de pouce, une idee ?

J'ai lu pas mal de posts ici relatifs aux tris par valeurs de Hashs
Mais je n'arrive pas a le transposer ici.
Ce sont généralement des tris pour des hash "simpes" : $HASH{'Clef'} = 'valeur'

Merci d'avance

[djibril]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 #!/usr/bin/perl
use warnings;
use strict;
 
my %HASH;    
 
$HASH{'ClefA'}{'Nombre'} = "61";    
$HASH{'ClefB'}{'Nombre'} = "50";    
$HASH{'ClefC'}{'Nombre'} = "92";
 
foreach my $cle ( sort { $HASH{$b}{Nombre} <=> $HASH{$a}{Nombre} } keys %HASH ) {
  print "$HASH{$cle}{Nombre} : $cle\n";
}

[KuK]

Merci

Cela fonctionne parfaitement.