Posted to tcl by aku at Thu May 02 18:40:44 GMT 2013view raw

  1.  
  2. set s [socket www.example.com 80]
  3. read $s
  4. close $s
  5.