fork download
  1. largeList<-
  2. c("\t\t\t73,Tuesday,08/23/2014,09:03PM,Data Transfer,KB,\"60 KB\",MSDG,AT,GPRR,,0.00",
  3. "\t\t\t74,Tuesday,08/23/2014,10:17PM,Data Transfer,KB,\"1,412 KB\",MSDG,AT,GPRR,,0.00",
  4. "\t\t\t75,Wednesday,08/24/2014,12:08AM,Data Transfer,KB,\"2,589 KB\",MSDG,AT,GPRR,,0.00",
  5. "\t\t\t76,Wednesday,08/24/2014,12:26PM,Data Transfer,KB,\"23,576 KB\",MSDG,AT,GPRR,,0.00",
  6. "\t\t\t85,Thursday,08/25/2014,05:17PM,Data Transfer,KB,\"78,088 KB\",MSDG,AT,GPRR,,0.00")
  7. gsub("^[^\"]*\"([^\"]+).*", "\\1", largeList)
Success #stdin #stdout 0.3s 22840KB
stdin
Standard input is empty
stdout
[1] "60 KB"     "1,412 KB"  "2,589 KB"  "23,576 KB" "78,088 KB"