updated tcl script for pexarria