fork download
  1. X <- c("ABC(DEF)", "ABC")
  2. sub(".*(?:\\((.*)\\)).*|.*", "\\1",X)
Success #stdin #stdout 0.47s 79168KB
stdin
Standard input is empty
stdout
[1] "DEF" ""