It's hard to say what better/more elegant would be in the absence of some context. That said, if all I wanted to do was to print an array forwards and backwards, with spaces between the elements, I'd just do something like

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

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