$match = qq@  return (\$1,\$2) if m!(foo)(bar)!; @;