blob: 0929e24151e9e7defe39412bdceae458c3b3749d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
tclsh
foreach address {
10.1.1.1
10.1.2.1
10.1.3.1
10.1.12.1
10.1.12.2
10.1.23.2
10.1.23.3
192.168.100.1
192.168.101.1
192.168.102.1
192.168.103.1
} {
ping $address }
exit
|