Ok, using that other thread, i have come up with this: .... proc recruit:msgm {nick uhost hand args} { global surveyQ surveyA if {[info exists surveyA($uhost)]} { lappend surveyA($uhost) $args if {[llength $surveyA($uhost)]<[llength $surveyQ]} { # there are more questions to be asked... putserv &quo...