Hallo Holger,
my @unsortiert = sort {(split(//,$a))[4] cmp (split(//,$b))[4]} besucher;
@sortiert = reverse @unsortiert; ^.........1) ^..........2)
^..........3)
Da kann ich Dir hoffentlich helfen ;-)
- Verwende einfach statt cmp (Stringvergleich) <=> (numerischer Vergleich)
- fehlt hier nicht ein Ed? ;-)
- reverse kannst Du Dir ersparen, wenn Du $a und $b vertauschst. Dann ist @unsortiert (was ja eigentlich nicht stimmt ;-) in absteigender Reihenfolge sortiert.
Gruß AlexBausW