Help for this page
for $" (qw( a b c d )) { print "@{[1, 2, 3]}"; }
$ perl for $" (qw( a b c d )) { ... } __END__ 1a2a31b2b31c2c31d2d3$