use Regexp::Common;
/$RE{list}{-pat => "\\w+|$RE{quoted}"}/;