RE: Parse::RecDescent and catenating (no skip match)

How about

$skip = qr/,?/;

As long as you don't have to worry about one field's matching a prefix of
another (which seems unlikely since the commas are optional), this seems
like it should do the trick.

/s