my @array = qw(one two three);
print "@{[@array, reverse @array]}\n";

##</code><code>##

my @yarra = reverse my @array = qw(one two three);
print "@array @yarra\n";