fork download
  1. gsub("\\pL\\K", ".", "adskhfks", perl = TRUE)
  2. # [1] "a.ds.kh.fk.s"
  3. gsub("(?<=\\p{L})", ".", "adskhfks", perl = TRUE)
  4. # [1] "a.d.s.k.h.f.k.s."
  5. gsub("(\\pL)", "\\1.", "adskhfks", perl = TRUE)
  6. # [1] "a.d.s.k.h.f.k.s."
Success #stdin #stdout 0.31s 39212KB
stdin
Standard input is empty
stdout
[1] "a.ds.kh.fk.s"
[1] "a.d.s.k.h.f.k.s."
[1] "a.d.s.k.h.f.k.s."