fork download
  1. x <- "This is a URL: https://t...content-available-to-author-only...t.com/ThisIsAURL !"
  2. trimws(gsub("https?://\\S*(*SKIP)(*F)|[[:punct:]]+", " ", x, ignore.case=TRUE, perl=TRUE))
Success #stdin #stdout 0.22s 39432KB
stdin
Standard input is empty
stdout
[1] "This is a URL  https://t...content-available-to-author-only...t.com/ThisIsAURL"