$ perl -E 'my @x = (1,2,3); say ">@x<"'
>1 2 3<