can't read "dir": no such variable
    while executing
"file join $dir ldap.tcl"
    (in namespace eval "::request" script line 4)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
# Tcl package index file, version 1.1

if {![package vsatisfies [package provide Tcl] 8.5]} {return}
package ifneeded ldap 1.9.2 [list source [file join $dir ldap.tcl]]

# the OO level wrapper for ldap
package ifneeded ldapx 1.1 [list source [file join $dir ldapx.tcl]]