can't read "dir": no such variable
    while executing
"file join $dir smtp.tcl"
    (in namespace eval "::request" script line 2)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
if {![package vsatisfies [package provide Tcl] 8.3]} {return}
package ifneeded smtp 1.5 [list source [file join $dir smtp.tcl]]
if {![package vsatisfies [package provide Tcl] 8.5]} {return}
package ifneeded mime 1.6.3 [list source [file join $dir mime.tcl]]