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

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

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;
[download]