1 2 3 4 5 6 7 8 9 10 11
tclsh foreach address { 209.165.200.238 209.165.200.242 209.165.200.241 209.165.200.225 209.165.200.226 209.165.202.129 } { ping $address source 192.168.1.1 } exit