while you've been given better answers, if you're intrested, the rexexp :

s/\"\"\"(.+?),(.+?)\"\"\"/\"\"\"$1|$2\"\"\"/

should do it