$rxNumberGrps = qr
   {(?x)
       \D*
       (\d+)
       (?=,|\))
       (?{$deCommafied .= $^N})
       (?:
          (??{$rxNumberGrps})
          |
          \)\z
       )
   };

##</code><code>##

$rxNumberGrps = qr
   {(?x)
       \D*
       (\d+)
       (?=,|\))
       # append capture to $deCommafied
       (?{$deCommafied .= $^N})
       (?:
          (??{$rxNumberGrps})
          |
          \)\z
       )
   };

##</code><code>##

$rxNumberGrps = qr
   {(?x)
       \D*
       (\d+)
       (?=,|\))
       # append capture to \$deCommafied
       (?{$deCommafied .= $^N})
       (?:
          (??{$rxNumberGrps})
          |
          \)\z
       )
   };

##</code><code>##

$rxNumberGrps = qr
   {(?x)
       \D*
       (\d+)
       (?=,|\))
       (?# append capture to $deCommafied)
       (?{$deCommafied .= $^N})
       (?:
          (??{$rxNumberGrps})
          |
          \)\z
       )
   };