w <- c("so i said er well it would n't surprise me if it could bloody talk",  # quote marker
        "we got fifteen, well thirteen minutes",                              
        "well she brought a pie and she brought some er punch round",         
        "so your dad said well have n't i been soft ?",                       # quote marker
        "And he went [pause] well I can't feel any. ",                        # quote marker
        "I goes well they'll improve the grant to start off with",            # quote marker
        "so with the chips as well this is about one sixty .",                
        "well we 're not all the same are we , but") 
grep("\\b(?:said|goes|went)\\b.*\\bwell\\b(*SKIP)(*F)|\\bwell\\b", w, value = TRUE, perl = TRUE)

dyA8LSBjKCJzbyBpIHNhaWQgZXIgd2VsbCBpdCB3b3VsZCBuJ3Qgc3VycHJpc2UgbWUgaWYgaXQgY291bGQgYmxvb2R5IHRhbGsiLCAgIyBxdW90ZSBtYXJrZXIKICAgICAgICAid2UgZ290IGZpZnRlZW4sIHdlbGwgdGhpcnRlZW4gbWludXRlcyIsICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgCiAgICAgICAgIndlbGwgc2hlIGJyb3VnaHQgYSBwaWUgYW5kIHNoZSBicm91Z2h0IHNvbWUgZXIgcHVuY2ggcm91bmQiLCAgICAgICAgIAogICAgICAgICJzbyB5b3VyIGRhZCBzYWlkIHdlbGwgaGF2ZSBuJ3QgaSBiZWVuIHNvZnQgPyIsICAgICAgICAgICAgICAgICAgICAgICAjIHF1b3RlIG1hcmtlcgogICAgICAgICJBbmQgaGUgd2VudCBbcGF1c2VdIHdlbGwgSSBjYW4ndCBmZWVsIGFueS4gIiwgICAgICAgICAgICAgICAgICAgICAgICAjIHF1b3RlIG1hcmtlcgogICAgICAgICJJIGdvZXMgd2VsbCB0aGV5J2xsIGltcHJvdmUgdGhlIGdyYW50IHRvIHN0YXJ0IG9mZiB3aXRoIiwgICAgICAgICAgICAjIHF1b3RlIG1hcmtlcgogICAgICAgICJzbyB3aXRoIHRoZSBjaGlwcyBhcyB3ZWxsIHRoaXMgaXMgYWJvdXQgb25lIHNpeHR5IC4iLCAgICAgICAgICAgICAgICAKICAgICAgICAid2VsbCB3ZSAncmUgbm90IGFsbCB0aGUgc2FtZSBhcmUgd2UgLCBidXQiKSAKZ3JlcCgiXFxiKD86c2FpZHxnb2VzfHdlbnQpXFxiLipcXGJ3ZWxsXFxiKCpTS0lQKSgqRil8XFxid2VsbFxcYiIsIHcsIHZhbHVlID0gVFJVRSwgcGVybCA9IFRSVUUp