Warning: this is an htmlized version!
The original is here, and
the conversion rules are here. 
#!/bin/sh
# Mude de "sh" para "wish": \
exec wish "$0" -- "$@"

source $env(HOME)/TCL/inc.tcl
eval [lindex $argv 1]