Getty image transfer Tcl Threaded