[perl #69172] Whatever star and !% (divisibility test) interact badly

[via RT]

# New Ticket Created by  Moritz Lenz 
# Please include the string:  [perl #69172]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=69172 >


works with explicit closure:

15:39 <@moritz_> rakudo: say (1..10).grep({ $_ !% 3}).perl
15:39 < p6eval> rakudo a9ff30: OUTPUT«[3, 6, 9]␤»

But not the with a Whatever-star:

15:38 <@moritz_> rakudo: say (1..10).grep(* !% 3).perl
15:38 < p6eval> rakudo a9ff30: OUTPUT«[]␤»

Cheers,
Moritz