Why not go for truly ugly? ;-)

@array[0..$#array] = @array[map{-$_}(1..@array)];
[download]

---

You have moved into a dark place.
It is pitch black. You are likely to be eaten by a grue.