my @a = (1, 2, 3, 10); my @umgekehrt = reverse(@a); print "Ursprünglich: ", join(',', @a), "\n"; print "Umgekehrt: ", join(',', @umgekehrt), "\n"; > Ursprünglich: 1,2,3,10 > Umgekehrt: 10,3,2,1