:s/,/*/g
S=eval(@")
ZZ