TCL and Extended Traceroute

[ironshoreit]

I am trying to setup a TCL script that will do a extended traceroute to multiple sites to test PBR changes i will be making. 

The script needs to take a list of IP address and run an extended traceroute to each.  I need to source the traceroute from a particular address. 

Does anybody have any examples for this? 

[Joe Clarke]

Something like this should do.  This script will take a list of addresses starting with the source address.

set source [lindex $argv 0]
foreach addr [lrange $argv 1 end] {
    traceroute $addr source $source
}

Save this into a file, then run it like:

Router#tclsh tr.tcl source_ip addr1 addr2 ...