Evaluated map [lsearch -inline -regexp -all [info proc] ^ST] {x {rename $x {}}}