Comment lancer un script tcl à partir d'un autre script tcl sans le rechercher dans le script principal?

Question

J'essaie d'exécuter le fichier test.tcl à partir du fichier main.tcl, sans le rechercher et je reçois une erreur en disant pas de fichier ou de répertoire, même si les deux script dans le même répertoire. J'ai essayé les commandes exec et tclsh, mais cela ne fonctionnait pas. Pourriez-vous s'il vous plaît proposer une idée pour le gérer.

Answer 1

Laissez le test.tcl tel quel. Changez main.tcl comme suit. Il suppose que test.tcl et main.tcl sont dans le même dossier. Si vous utilisez des chemins complets ou relatifs, notez que lorsque vous utilisez \ folder \ subdir, vous devez double-slash \\ folder \\ subdir, ou simplement utiliser une simple barre oblique (Tcl a * nix origines)/dossier/sous-répertoire.

puts "From main.tcl launching test.tcl" 
set result [exec [info nameofexecutable] test.tcl] 
puts $result 

à partir du type de ligne de commande:

tclsh.exe main.tcl 

Et le résultat ressemblera à ceci:

From main.tcl launching test.tcl 
Executed Second script