Salut,
je dois developper un petit programme en langage TCL. Je cherche a executer dans ce script un autre script tcl et pouvoir recuperer en temps réel ce que le deuxième script affiche. j'ai essaye en faisant avec un piepeline :
Code :
- set test [open "| C:/tcl/bin/tclsh84.exe test1.tcl" ]
- while {1} {
- set data2 [gets $test ]
- append data2 "\n"
- if {[eof $test]} {
- close $test
- break
- }
- puts $data2
- }
|
mais le problème c'est que le deuxième script bloque l'execution du premier. De ce fait le resultat est affiche qu'a la fin du deuxième script
Si qlq a une idée, merci bcq d'avance