Pass Arguments To Tcl Script