Select Code to Download

$ perl -E 'say for 1 ..2'
1
2

$ perl -E 'for (1 .. 2) { say }'
1
2

$ perl -E 'my $fetch = sub { say "fetching ..." }; $fetch->() for 1 ..
+2'
fetching ...
fetching ...