how to execute a command for multiple occurrance and change the variable from list each time
===

I have a list which contains
   72.xx.xxx.xxx          72.xx.xxx.xxx
(There are some spaces )
I have a variable say var

Now I have to execute a command for $var times and I have to use "72.xx.xxx.xxx" each time.
let us say the command is :
"reset vpn $IP".

I have to execute the above command say two times (stored in variable) and for two IP address stored in list.
Can any one help with TCL code?
Thanks in advance.
 