1 2 3 4 5 6 7 8 9 10 11
tclsh foreach address { 192.168.1.5 192.168.1.6 172.24.1.17 172.24.1.18 10.2.2.1 198.133.219.1 } { ping $address } exit