title: using awk in tcl script
body: <p>I want to print a particular column number fields in a file while in TCL script.</p>
  
  <p>I tried with <code>exec awk '{print $4}' foo</code> where foo is filename, but it is not working as it gives error  </p>
  
  <p><code>can't read "4": no such variable</code></p>
  
  <p>How can I do above awk in tcl scripting?</p>
  
  <p>Thanks,</p>