Re: TCL Script

From: Dan C (cdan2154@gmail.com)
Date: Tue Mar 20 2007 - 09:11:02 ART


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]" }
>
> _____________________________________________________________________________
> _______
> 8:00? 8:25? 8:40? Find a flick in no time
> with the Yahoo! Search
> movie showtime shortcut.
> http://tools.search.yahoo.com/shortcuts/#news
>
> _______________________________________________________________________
> Subscription information may be found at:
> http://www.groupstudy.com/list/CCIELab.html



This archive was generated by hypermail 2.1.4 : Sun Apr 01 2007 - 06:35:52 ART