{sub($1,"", $1)}
 {gsub(" ", ",")}
 {sub(/^,/, "")}
 {print $0}