[perl #57722] [PATCH] Substr with negative start and length gives different results from perl5

[jn...@jnthn.net via RT]

On Thu Aug 07 12:41:32 2008, ronaldxs wrote:
> From the irc log for today (8/7)
> 
> 15:50 </perl6/2008-08-07#i_426959> ron perl6: my $a = '0123456'; say
> substr($a, -5, -2);
> 15:50 </perl6/2008-08-07#i_426960> p6eval elf 21826, pugs: OUTPUT[234?]
> 15:50 </perl6/2008-08-07#i_426961>
> ..rakudo 29834: OUTPUT[23456?]
> 
> 
> perl5 agrees with the pugs output.
> 
> Attached patch fixes the problem and includes a test in: S29-str/substr.t
> 
Applied Rakudo patch as r34031 and added the test.

Many thanks,

Jonathan