no such variable
    (read trace on "env(HOME)")
    invoked from within
"file join $env(HOME) ordalie"
    (in namespace eval "::request" script line 6)
    invoked from within
"namespace eval ::request $script"
    ("::try" body line 12)
OUTPUT BUFFER:
#!/usr/local/bin/tclsh


set dir [file normalize [file join [file dirname [info script]] .. ..]]
#set instDir /Applications/Ordalie.app
set instDir [file join $env(HOME) ordalie]
set srcDir [file join $dir macosx-x86_64]
puts "\ndir $dir"
puts "srcDir $srcDir"
puts "instDir $instDir\n"
if {! [file exists $instDir]} {
    if {[catch {file mkdir $instDir}]} {
	puts "\n>> WARNING <<\n Can't write in /Applications\n"
    }
}

if {[file exists ordalie]} {
    file mkdir [file join $dir ordalie]
} else {
    catch {file delete {*}[glob [file join $dir ordalie *]]}
}

file copy -force {*}[glob "$srcDir/*"] [file join $instDir .]

exit