Bir dosya adında test7.tcl var Tcl

Question

yılında kaynağı ile ilgili bir soru:

namespace eval ::dai { 
    variable name "ratzip" 
    variable birthday "1982" 
    proc hello {} { 
     variable name 
     variable birthday 
     puts "Hello, I am $name birthday is $birthday" 
    } 
} 

ve bu şekilde bu başka bir dosya içine dosya denilen test8.tcl kaynak istiyorum:

source test7.tcl 

::dai::hello 

ama bana hata veriyor: "test7.tcl" dosyasını okuyamadı: böyle bir dosya veya dizin yok

ancak iki dosya aynı klasörün altında, ne oldu?

Answer 1

bu kullanımı:

source [file join [file dirname [info script]] "test7.tcl"] 

Not Bu dış komut dosyası içinde tanımlanan prosedürler içinde değil çalışır ki (test8.tcl Sizin durumunuzda) çünkü kaynak bittikten sonra genellikle çağrılırlar. Bu durum sizin için en uygun çözüm ise, dış komut dosyanızdaki bir değişkendeki info script çıktısını kaydetmektir (ya da en sonunda en iyi yaklaşım için sadece temassız yerine tüm dosyaları hemen kaynak).

Answer 2

test8.tcl yoluna göre kaynaklanacak dosyanın yolunu belirtmeniz gerekmez, ancak yürürlükteki çalışma dizinine göre. Örneğin. Mutlak yolu kullanın:

source /path/to/test7.tcl 

Answer 3

kullanın source [file join [file dirname [info script]] test7.tcl] - Eğer source yürütme dosyanın tam yolunu inşa onun tam dosya yolları hedef dosyasını kaynak olacak bu şekilde; Bu, geçerli dizininiz yürütme sırasında ne olursa olsun çalışacaktır. Şu anda yürütülen komut aynı dizinde bir dosyayı kaynak için