txt1 = "quiz.1.player.chat_results"
txt2 = "partner_quiz.1.player.chat_results"
txt3 = "test1 quiz.1.player.chat_results test2"
pattern = "\\b(?!partner)quiz\\.[1-5]\\.player\\S*"
regmatches(txt1,regexpr(pattern,txt1, per=TRUE))
regmatches(txt2,regexpr(pattern,txt2, per=TRUE))
regmatches(txt3,regexpr(pattern,txt3, per=TRUE))
dHh0MSA9ICJxdWl6LjEucGxheWVyLmNoYXRfcmVzdWx0cyIKdHh0MiA9ICJwYXJ0bmVyX3F1aXouMS5wbGF5ZXIuY2hhdF9yZXN1bHRzIgp0eHQzID0gInRlc3QxIHF1aXouMS5wbGF5ZXIuY2hhdF9yZXN1bHRzIHRlc3QyIgpwYXR0ZXJuID0gIlxcYig/IXBhcnRuZXIpcXVpelxcLlsxLTVdXFwucGxheWVyXFxTKiIKCnJlZ21hdGNoZXModHh0MSxyZWdleHByKHBhdHRlcm4sdHh0MSwgcGVyPVRSVUUpKQpyZWdtYXRjaGVzKHR4dDIscmVnZXhwcihwYXR0ZXJuLHR4dDIsIHBlcj1UUlVFKSkKcmVnbWF0Y2hlcyh0eHQzLHJlZ2V4cHIocGF0dGVybix0eHQzLCBwZXI9VFJVRSkp