fork(1) download
  1. # http://stackoverflow.com/q/8697079/5290909
  2.  
  3. x <- "I like %$@to*&, chew;: gum, but don't like|}{[] bubble@#^)( gum!?"
  4. gsub("[^'[:^punct:]]", "", x, perl=T)
  5.  
  6. #[1] "I like to chew gum but don't like bubble gum"
Success #stdin #stdout 0.3s 22840KB
stdin
Standard input is empty
stdout
[1] "I like to chew gum but don't like bubble gum"