# New Ticket Created by "Carl Mäsak" # Please include the string: [perl #111382] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=111382 >
<moritz> nom: sub increase-by-n($orig, $n) { ($orig, *.succ ... *)[$n] }; say increase-by-n('a', 18) <p6eval> nom 409db1: OUTPUT«s» <masak> nom: sub increase-by-n($orig, $n) { ($orig ... *)[$n] }; say increase-by-n('a', 18) <p6eval> nom 409db1: OUTPUT«Decrement out of range [...] <masak> decrement!? <masak> nom: .say for (1 ... 100)[^10] <p6eval> nom 409db1: OUTPUT«12345678910» <masak> nom: .say for (1 ... *)[^10] <p6eval> nom 409db1: OUTPUT«12345678910» <masak> nom: .say for ("a" ... *)[^10] <p6eval> nom 409db1: OUTPUT«Decrement out of range [...] <masak> I call bug. * moritz calls masak * masak submits rakudobug