Sortieren einer Tabelle

[Holger A.]

Hallo zusammen,

Hab da schon wieder ein Problem, an dem ich nun 3 Tage
schon herum mache.
Ich möchte eine Tabelle nach Zahlen sortieren.

my @unsortiert = sort {(split(//,$a))[4] cmp (split(//,$b))[4]} besucher;
@sortiert = reverse @unsortiert;

Dieser Sortiert natürlich die Tabelle nach der 5. Spalte.
So sollte das Ergebniss ausehen:
40
39
38
20
19
13
12
12
9
5
4
3
2
1
und so siehts aus aus wenns der sort Befehl von oben es ausführt.
9
5
4
40
3
39
38
2
20
1
19
13
12
12

Was mache ich Falsch ?

Vielen Dank für eure Antworten

Gruss Holger A.