It works for me:

my @array = (1,2,3,4,5);
print rev_array @array;
[download]

prints "54321".