[perl #125820] .roll(-9999999999999999999999999999999999999999999999999)

[via RT]

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


Code:
say <a b c d
e>.roll(-9999999999999999999999999999999999999999999999999).perl;

Result:
it hangs

Code:
say <a b c d
e>.roll(-99999999999999999999999999999999999999999999999999999999999999999).perl;

Result:
("b",)


On the other hand:
say <a b c d
e>.roll(99999999999999999999999999999999999999999999999999999999999999999).perl;

Result:
()