Posted to tcl by mr_calvin at Thu Jul 19 10:18:04 GMT 2018view raw

  1. gets stdin line
  2. if {[eof stdin]} {
  3. gets stdin var; # does not block under win?
  4. }
  5.