title: TCL - split string by arbitrary number of whitespaces to a list
body: <p>Say I have a string like this:</p>
  
  <pre><code>set str "AAA    B C     DFG 142               56"
  </code></pre>
  
  <p>Now I want to get a list as follows:</p>
  
  <pre><code>{AAA B C DFG 142 56}
  </code></pre>
  
  <p>For that I want to use split function, but in that case I get some extra empty lists {}. How I can get the list above?</p>