largeList<-
c("\t\t\t73,Tuesday,08/23/2014,09:03PM,Data Transfer,KB,\"60 KB\",MSDG,AT,GPRR,,0.00",
"\t\t\t74,Tuesday,08/23/2014,10:17PM,Data Transfer,KB,\"1,412 KB\",MSDG,AT,GPRR,,0.00",
"\t\t\t75,Wednesday,08/24/2014,12:08AM,Data Transfer,KB,\"2,589 KB\",MSDG,AT,GPRR,,0.00",
"\t\t\t76,Wednesday,08/24/2014,12:26PM,Data Transfer,KB,\"23,576 KB\",MSDG,AT,GPRR,,0.00",
"\t\t\t85,Thursday,08/25/2014,05:17PM,Data Transfer,KB,\"78,088 KB\",MSDG,AT,GPRR,,0.00")
gsub("^[^\"]*\"([^\"]+).*", "\\1", largeList)
bGFyZ2VMaXN0PC0KICBjKCJcdFx0XHQ3MyxUdWVzZGF5LDA4LzIzLzIwMTQsMDk6MDNQTSxEYXRhIFRyYW5zZmVyLEtCLFwiNjAgS0JcIixNU0RHLEFULEdQUlIsLDAuMDAiLAogICAgIlx0XHRcdDc0LFR1ZXNkYXksMDgvMjMvMjAxNCwxMDoxN1BNLERhdGEgVHJhbnNmZXIsS0IsXCIxLDQxMiBLQlwiLE1TREcsQVQsR1BSUiwsMC4wMCIsICAgICAgIAogICAgIlx0XHRcdDc1LFdlZG5lc2RheSwwOC8yNC8yMDE0LDEyOjA4QU0sRGF0YSBUcmFuc2ZlcixLQixcIjIsNTg5IEtCXCIsTVNERyxBVCxHUFJSLCwwLjAwIiwgICAgICAgICAgCiAgICAiXHRcdFx0NzYsV2VkbmVzZGF5LDA4LzI0LzIwMTQsMTI6MjZQTSxEYXRhIFRyYW5zZmVyLEtCLFwiMjMsNTc2IEtCXCIsTVNERyxBVCxHUFJSLCwwLjAwIiwKICAgICJcdFx0XHQ4NSxUaHVyc2RheSwwOC8yNS8yMDE0LDA1OjE3UE0sRGF0YSBUcmFuc2ZlcixLQixcIjc4LDA4OCBLQlwiLE1TREcsQVQsR1BSUiwsMC4wMCIpIApnc3ViKCJeW15cIl0qXCIoW15cIl0rKS4qIiwgIlxcMSIsIGxhcmdlTGlzdCk=