can't read "dir": no such variable
    while executing
"file join $dir tsurf01.dll"
    (in namespace eval "::request" script line 5)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
#
# Tcl package index file
#
package ifneeded tsurf 0.1 \
    [list load [file join $dir tsurf01.dll] tsurf]