fork(2) download
  1. text <- c("TreeRULakeSunWater", "A B C RU D")
  2. unknown_word <- gsub(".*Tree(\\w+)Lake.*", "\\1", text)
  3. gsub(paste("[[:space:]]*(", unknown_word[[1]], ")[[:space:]]*", sep=""), " \n\\1 ", text)
  4.  
Success #stdin #stdout 0.45s 79168KB
stdin
Standard input is empty
stdout
[1] "Tree \nRU LakeSunWater" "A B C \nRU D"