can't read "dir": no such variable
    while executing
"list $dir"
    (in namespace eval "::request" script line 1)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
package ifneeded Tk 8.6b1.1 [list load [file join [list $dir] .. libtk8.6[info sharedlibext]] Tk]