Select Code to Download

perl -wMstrict -E 'for my $d (qw(1 2 3)){say $d}'
1
2
3

perl -wMstrict -E 'for my $d qw(1 2 3){say $d}'
1
2
3