can't read "dir": no such variable
    while executing
"file join $dir copyops.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.4]} return
package ifneeded transfer::copy              0.3 [list source [file join $dir copyops.tcl]]
package ifneeded transfer::copy::queue       0.1 [list source [file join $dir tqueue.tcl]]
package ifneeded transfer::data::source      0.2 [list source [file join $dir dsource.tcl]]
package ifneeded transfer::data::destination 0.2 [list source [file join $dir ddest.tcl]]
package ifneeded transfer::connect           0.2 [list source [file join $dir connect.tcl]]
package ifneeded transfer::transmitter       0.2 [list source [file join $dir transmitter.tcl]]
package ifneeded transfer::receiver          0.2 [list source [file join $dir receiver.tcl]]