s = "Hello,How,Are,You,Today"
WScript.StdOut.Write Join(Split(s,","),".")