set sh "" set iface "" for {} {1<2} {} { set ln [gets -] if {[string equal $ln "."]} break set sh "$sh$ln
" if {[string first auth $ln] >= 0} {set auth [string range $ln 5 666]} if {[string first clnt $ln] >= 0} {set clnt [string range $ln 5 666]} if {[string first par.iface $ln] >= 0} {set iface [string range $ln 10 666]} } set ifc [exec "terminal tablemode fancy" "show interfaces $iface full"] puts "$iface traffic" puts "" puts "
$ifc
" puts ""