can't read "dir": no such variable
    while executing
"file join $dir peg.tcl"
    (in namespace eval "::request" script line 1)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)

OUTPUT BUFFER:

package ifneeded grammar::peg 0.2 [list source [file join $dir peg.tcl]] package ifneeded grammar::peg::interp 0.1.1 [list source [file join $dir peg_interp.tcl]]