Posted to tcl by rmax at Tue Jul 28 10:31:28 GMT 2015view raw

  1. regexp {(?:[^\{]|^){\w+\.\w+}} $string