# New Ticket Created by ugexe
# Please include the string: [perl #132050]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=132050 >
while $(1,2) -> @_ { FIRST { say 42 }; say @_; last if ++$ }
# Too few positionals passed; expected 1 argument but got 0
while $(1,2) -> @_ { LAST { say 42 }; say @_; last if ++$ }
# (1 2)
# 42
while $(1,2) -> $_ { FIRST { say 42 }; say $_; last if ++$ }
# Too few positionals passed; expected 1 argument but got 0
while $(1,2) -> *@_ { FIRST { say 42 }; say @_; last if ++$ }
# 42
# []
while $(1,2) -> $_? { FIRST { say 42 }; say $_; last if ++$ }
# 42
# (Mu)
https://irclog.perlgeek.de/perl6-dev/2017-09-09#i_15140996
