# Pastebin BgBVwEJn
$ perl6 -e 'my $*MAIN-ALLOW-NAMED-ANYWHERE = True; multi MAIN(+@a ($), Bool :$bla) {say @a}' --bla qwer --  --ble
Usage:
  -e '...' [--bla] [<a> ...]