perl -p -i.bak -e 's/\,\w{7}\,//g - which does not work.