Tcl
Written using
expect (1622)