# New Ticket Created by Sam S.
# Please include the string: [perl #126569]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=126569 >
This works:
➜ .pick xx 10 given 1..6
(6 3 1 1 5 1 6 3 4 2)
But putting parens around the xx operation, breaks it:
➜ (.pick xx 10) given 1..6
((Any) (Any) (Any) (Any) (Any) (Any) (Any) (Any) (Any) (Any))
The problem only seem to occur when $_ was set by a statement modifier - not
when it was assigned to manually or set by the block form of 'given'.
An example of a useful idiom which relies on putting parens around an xx
operation, is
(EXPRESSION xx *).first(CONSTRAINT)
for "keep retrying EXPRESSION until the result matches CONSTRAINT".
