Perl正则表达式从替换返回匹配

I am trying to simultaneously remove and store (into an array) all matches of some regex in a string. To return matches from a string into an array, you could useI am trying to simultaneously remove and store