fork download
  1. x <- "https://w...content-available-to-author-only...c.gov/Archives/edgar/data/1347185/000134718517000016/0001347185-17-000016-index.htm/exh1025730032017.xml"
  2. sub("^(.*/).*/(.*)", "\\1\\2", x)
Success #stdin #stdout 0.2s 175424KB
stdin
Standard input is empty
stdout
[1] "https://w...content-available-to-author-only...c.gov/Archives/edgar/data/1347185/000134718517000016/exh1025730032017.xml"