@ary = $str =~ m/(stuff)/g;