From: Hossam Abbas (habbas97@yahoo.com)
Date: Tue Mar 20 2007 - 18:37:08 ART
Hi Dan,
Thanks for ur great help
----- Original Message ----
From: Dan C
<cdan2154@gmail.com>
To: Hossam Abbas <habbas97@yahoo.com>
Cc:
ccielab@groupstudy.com
Sent: Tuesday, March 20, 2007 2:11:02 PM
Subject: Re:
TCL Script
Hi Hossam,
Please have a look below :
R6(tcl)#foreach ip {
+>(tcl)#1.1.1.1
+>(tcl)#1.1.2.2
+>(tcl)#} {puts "exec [ping $ip]" }
exec
Type
escape sequence to abort.
Sending 5, 100-byte ICMP Echos to 1.1.1.1, timeout
is 2 seconds:
!!!!!
Success rate is 100 percent (5/5), round-trip min/avg/max
= 56/56/60 ms
exec
Type escape sequence to abort.
Sending 5, 100-byte ICMP
Echos to 1.1.2.2, timeout is 2 seconds:
!!!!!
Success rate is 100 percent
(5/5), round-trip min/avg/max = 56/57/60 ms
R6(tcl)#
To save few pushes on
the keyboard you can use the following script too:
R6#tcls
R6(tcl)#foreach
ip {
+>(tcl)#1.1.2.2
+>(tcl)#1.1.1.1
+>(tcl)#} {ping $ip}
Cheers,
Dan
On
3/20/07, Hossam Abbas <habbas97@yahoo.com> wrote:
>
> Hi,
> Could any1 please
explain to me the TCL script used for testing
> connectivity in the lab exame
>
> like this script:
>
> tclsh
> foreach i {
> 136.1.136.1
> 136.1.15.1
>
150.1.1.1
> } { puts "exec [ping $i]" }
>
>
This archive was generated by hypermail 2.1.4 : Sun Apr 01 2007 - 06:35:52 ART