1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
lassign [socket pipe] r w # Note, once the exec has the fh (via dup), close it # so that the pipe data is accessible exec ps aux >@$w & $w close $r readable { puts [$r gets] if {[eof $r]} { $r close set done 1 } } vwait done