1 2 3 4 5 6 7 8 9 10 11 12 13 14
tclsh foreach address { 192.168.1.5 192.168.1.6 172.16.1.1 172.16.1.2 192.168.1.1 192.168.1.2 172.16.64.1 172.16.32.1 192.168.100.1 } { ping $address } exit