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