#!/usr/local/bin/tclsh8.4 # The exec tclsh'' below will simply be ignored. # # This script sleeps for 5 seconds, then generates output. # \ if [ -e /usr/bin/tclsh ]; then exec /usr/bin/tclsh "$0" ${1+"$@"} ; fi # \ if [ -e /usr/local/bin/tclsh8.4 ]; then exec /usr/local/bin/tclsh8.4 "$0" ${1+"$@"} ; fi # \ if [ -e /usr/local/bin/tclsh8.3 ]; then exec /usr/local/bin/tclsh8.3 "$0" ${1+"$@"} ; fi # \ if [ -e /usr/bin/tclsh8.4 ]; then exec /usr/bin/tclsh8.4 "$0" ${1+"$@"} ; fi # \ exec tclsh "$0" ${1+"$@"} set text [exec sleep 5; exec ls] puts $text close [open /tmp/something w] exit 0