can't read "dir": no such variable
    while executing
"file join $dir tdom083.dll"
    (in namespace eval "::request" script line 2)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
package ifneeded tdom 0.8.3 \
"load [list [file join $dir tdom083.dll]];\
         source [list [file join $dir tdom.tcl]]"