or to get them in the order he posted in: @a = sort { $b <=> $a } @list; =)

-Waswas