Select Code to Download

for $\ (qw( a b c d )) {
    print "@{[1, 2, 3]}";
...
#output
1 2 31 2 31 2 31 2 3
1 2 31 2 31 2 31 2 3