my $joined = do {
  local $" = '|';
  qr/@pats/;
};