tcl - expect scripts to automatize some rutinary tasks