Sortieren von zwei Arrays die in Beziehung stehen

[Struppi]

Leider klappt das ganze nicht so richtig, da das ganze nicht wirklich geordnet wird, von groß nach klein, sondern wilkürlich!!!
Wie mach ich es, das es nicht wilkürlich geordnet wird, sondern von Punktezahl abhängig von oben nach unten???

use strict;
my %user;

$user{name1} = { nick => 'n1', punkte => 10};
$user{name2} = { nick => 'n2', punkte => 101};
$user{name3} = { nick => 'n3', punkte => 100};
$user{name4} = { nick => 'n4', punkte => 111};
$user{name5} = { nick => 'n5', punkte => 99};

foreach( sort { $user{$a}->{punkte} <=> $user{$b}->{punkte} } keys %user)
{
printf "Name: %3s pkt:%5d\n", $user{$_}->{nick}, $user{$_}->{punkte};
}

Wenn du es umgekehrt machen willst musst du $a und $b vertauschen.

Struppi.