my ($exclude_re) = map qr/$_/,
                   join '|',
                   map quotemeta,
                   @names;