$ perl -wE 'for ( my @aa = ( 1,2,3 ) ) { say "@aa"; }'
1 2 3
1 2 3
1 2 3