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