Evaluated proc down {host {port 80}} {if {[catch "error: eof" cum] == 1} {. down: $cum}}