Select Code to Download

$ perl6 -e 'any({say 42}, {say 23}).()'
42
...
$ perl6 -e 'any({say $^x }, { say 40 + $^x }).(2)'
2
42