To combine capturing regular expressions while keeping numbering their matches from $1, you can use the "branch reset" pattern (?|...) (Perl version 5.10+), see Extended Patterns.