A simple ping application based on TCL/TK