sed ':
s/\(.*[^,]\)\([^,]\{3\}\)/\1,\2/
t'