expect TCL script

Hello,

I write a TCL script for Expect/ Telnet.

I want to send command to the telnet server.
But I want to close after the command is sent.

Anybody know which command can flush the expect so I can sure the command is sent to the telnet server???

EX:

send "./command1\r"
close $session
......
send "./command2\r"
close $session
......

Thanks.