Help for this page

Select Code to Download


  1. or download this
    @arr = $str =~ /(\w|\[\w+\])/g;
    
  2. or download this
    @arr = grep $_, $str =~ /(\w)|\[(\w+)\]/g;