ron schmidt perl6bugsfollowupperlorg new ticket created ron schmidt please include string perl 57722 subject line future correspondence issue index srcbuiltinsanystrpir srcbuiltinsanystrpir revision 30090 srcbuiltinsanystrpir working copy 898 8910 len selfchars have_len len 0 goto len_done start 0 goto neg_start i0 selfchars len i0 neg_start len start len_done s0 self index tspecs29strsubstrt tspecs29strsubstrt revision 21834 tspecs29strsubstrt working copy 27 27 use test plan 42 plan 43 l 246 247 issubstrstr 0 2 foob beginning negative length issubstrstr 2 2 ob middle negative length issubstrstr 3 3 negative length gives empty string issubstrstr 4 1 oba negative start length isstr foobar original string still changed thu 07 aug 2008 124133 0700 perl 57722 substr negative start length gives different results perl5