fork(1) download
  1. text100 <- "My number#number # ## #number number# is 1234"
  2. gsub("(?<!\\w|#)[#](?!\\w|#)", "hash", text100, perl=T)
  3.  
Success #stdin #stdout 0.29s 22832KB
stdin
Standard input is empty
stdout
[1] "My number#number hash ## #number number# is 1234"