fork download
  1. codes <- c("0002-01014", "0020-0014","00014-00010", "00000-122345")
  2. gsub("\\b0+\\B", "", codes)
  3.  
Success #stdin #stdout 0.21s 39200KB
stdin
Standard input is empty
stdout
[1] "2-1014"   "20-14"    "14-10"    "0-122345"