[perl #131270] Grabbing or picking NaN elements from a BagHash should not work (say ^5 .BagHash.pick(NaN))

[via RT]

# New Ticket Created by  Aleks-Daniel Jakimenko-Aleksejev 
# Please include the string:  [perl #131270]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=131270 >


Code:
my $x = (^5).BagHash;
say $x.grab(NaN);
say $x

Result:
[1 2 3 0 4]
BagHash.new()


In other words, it works like if you grabbed ∞ or *. It should probably error 
out in some way.