title: TCL: regexp exclude strings having characters
body: <p>I am not much skilled in TCL or using TCL regexp. But I am in need of a TCL mechanism / regexp which can exclude or let know that a word has some special characters if given a line / sentence. </p>
  
  <p>Assume that I have a line/sentence something like below:</p>
  
  <pre><code> (space)(space)At 4:00:00AM (not sure) please do your work ...
  </code></pre>
  
  <p>Now I try to split the line to get each words to loop using foreach:</p>
  
  <pre><code>% set fields [split "   At 4:00:00AM (not sure) please do your work" " " ]
  {} {} {} At 4:00:00AM (not sure) please do your work
  </code></pre>
  
  <p>But again I do not want empty fields:</p>
  
  <pre><code>% foreach val $fields {
         puts $val
  }
  
  
  
  At
  4:00:00AM
  (not
  sure)
  please
  do
  your
  work
  </code></pre>
  
  <p>Further to that I would like to exclude words in foreach loop that have special characters like:</p>
  
  <pre><code>(not
  sure)
  4:00:00AM
  </code></pre>
  
  <p>exclude words having '(' or ':' in start , end or anywhere in the word.</p>
  
  <p>Please let me how can I achieve this.</p>