Array Perl

#Format:
#reverse(LIST)
#reverse LIST
# Reversing the elements of an array
@names=("B", "D", "T", "G");
print "@names \n";
@reversed=reverse(@names),"\n";
print "@reversed\n";