while ($sock($sockname).rq > 0) { sockread &download_file .bwrite $qt($mircdir $+ filename.mrc) -1 -1 &download_file }