blob: bc7e34dd39a3ed5766f847d974d68d773572899a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
tclsh
foreach address {
209.165.201.1
209.165.201.2
209.165.202.129
209.165.202.130
209.165.200.225
209.165.200.226
209.165.200.253
209.165.200.254
209.165.200.249
209.165.200.250
209.165.201.29
209.165.201.30
209.165.202.157
209.165.202.158
192.168.1.1
} {
ping $address
}
foreach address {
209.165.200.254
209.165.201.30
209.165.202.158
} {
trace $address source 192.168.1.1
}
|
