Help for this page
Select Code to Download
Select
or
download this
@arr = $str =~ /(\w|\[\w+\])/g;
Select
or
download this
@arr = grep $_, $str =~ /(\w)|\[(\w+)\]/g;