# New Ticket Created by Clinton Gormley # Please include the string: [perl #64062] # in the subject line of all future correspondence about this issue. # <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=64062 >
'abc-def--ghi'.split(/(\-+)/) should return ['abc','-','def,'--','ghi'] but it returns ['abc','def,'ghi'] added tests to t/spec/S32-str/split-simple.t