I'd like to add Welch's Practical Programming in Tcl and Tk [1]. I used it for learning TCL for an internship and it was not a bad experience for an undergrad.

[1] http://www.beedub.com/book/