fork download
copy 
  1. s = "1\\"
  2. s1 = "\x01"
  3. cat(s, sep="\n")
  4. cat(s1, sep="\n")
  5. pat = "[^\\1]+"
  6. unlist(regmatches(s, gregexpr(pat, s)))
  7. unlist(regmatches(s1, gregexpr(pat, s1, perl=TRUE)))
Success #stdin #stdout 0.15s 178496KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
1\

character(0)
character(0)
https://ideone.com/6jxNMY
language:
R (R 3.5.2)
created:
8 years ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!