[perl #126569] xx-repeated expression enclosed in parens can't access the topic $_ of a statement modifier

[via RT]

# 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".