Shell Programming and Scripting

Hi,

I'm have a tcl application using expect. The application is connecting to a unix box and is running a script. What i need my app to do is show the output of the console as the script runs in realtime. At the moment, it my app is waiting until the script finishes and then dumps what is buffered.
Can someone help me get it working in realtime.
Here is the code i have so far:

Code:

.msg.box delete 1.0 end
    .msg.box insert end "Please Wait...\n"
    spawn ssh -q user@server /home/user/Scripts/test/20R-Start
    expect eof { .msg.box insert end $expect_out(buffer) }

As you can see, it runs the script, uses expect to buffer then outputs when finished.
Is there a way to get it to output to .msg.box in realtime, maybe use stdout??

Thanks,
Phil.