3 Einträge, 1 Seite |
1
2
3
4
5
6
7
8
9
10
11
12
13
my %HoH = ();
my $kriterium = "name";
$HoH{'n1'} = {'name'=>'E','nummer'=>1,'dinx'=>'x12'};
$HoH{'n2'} = {'name'=>'D','nummer'=>2,'dinx'=>'x2'};
$HoH{'n3'} = {'name'=>'C','nummer'=>3,'dinx'=>'x4'};
$HoH{'n4'} = {'name'=>'B','nummer'=>4,'dinx'=>'x8'};
$HoH{'n5'} = {'name'=>'A','nummer'=>5,'dinx'=>'x10'};
foreach(sort {$HoH{$b}{$kriterium} cmp $HoH{$a}{$kriterium}} keys %HoH){
print $_.": '".$HoH{$_}{$kriterium}."'<br>\n";
}
3 Einträge, 1 Seite |