Almost all of my exposure to TCL was IRC clients (xircon) and bots (eggdrop) in the 90s. Also my first job used it in some capacity that I forget, but it was through the tcl at that job that I had my first exposure to an event driven framework with chaining (twisted python style). It's a pretty odd language, but has some interesting and powerful ideas in it.