ovl <- c("well [yes right]", "let's go", "oh [ we::ll] i do n't (0.5) know", "erm [°well right° ]", "(3.2)")
unlist(regmatches(ovl, gregexpr("\\[[^][]*]", ovl)))
b3ZsIDwtIGMoIndlbGwgW3llcyByaWdodF0iLCAibGV0J3MgZ28iLCAib2ggWyAgd2U6OmxsXSBpIGRvIG4ndCAoMC41KSBrbm93IiwgImVybSBbwrB3ZWxsIHJpZ2h0wrAgXSIsICIoMy4yKSIpCnVubGlzdChyZWdtYXRjaGVzKG92bCwgZ3JlZ2V4cHIoIlxcW1teXVtdKl0iLCBvdmwpKSk=