Re: Complex Splitting

[rinceWind]

You're better of using a matching regex rather than a split:

@arr = $str =~ /(\w|\[\w+\])/g;

Update: thanks to monarch for pointing this out. The above leaves the brackets behind. One option is to split the capture and filter out the undefs thus:

@arr = grep $_, $str =~ /(\w)|\[(\w+)\]/g;

[eric256]

 @arr = grep {defined} $str =~ /(\w)|\[(\w+)\]/g; gets exactly what you wanted without the brackets. Not sure how to avoid the undef's except grepping them out.