Create ping.tcl