<pre> set chunkhandle [ open {get_chunk} r] while { [gets chunkhandle line] >= 0 } { #process line } </pre>