Bob the Builder

A British toddler television show that has invaded the States (and my home). Couldn't get the damn song out of my head while developing some Tcl code...

So, here is the Tcl version of the song Can we Fix it? [L1 ]:

 CAN WE GLUE IT? (Sung to the tune of "CAN WE FIX IT - Bob the Builder")

 Tcl the Scripter
 Can we glue it?
 Tcl the Scripter
 Yes, we can!

 Curl, SWIG and Itcl and Metakit too
 Jacl and TclBlend join the crew
 Tcl and the gang have so much fun
 Working together, they get the job done

 Tcl the Scripter
 Can we glue it?
 Tcl the Scripter
 Yes, we can!

 Time to get busy, such a lot to do
 Building and gluing till it's good as new
 Tcl and Snack make a really good sound
 Watching the others work all day till the sun goes down

 Tcl the Scripter
 Can we glue it?
 Tcl the Scripter
 Yes, we can!

 Scripting and gluing, having so much fun
 Working together, they get the job done
 Can we code it? Yes!
 Can we wrap it? Yes!
 Can we glue it? Yes!

 Tcl the Scripter
 (Yeah!)
 Tcl the Scripter
 All together now!

 Tcl the Scripter
 Can we glue it?
 Tcl the Scripter 
 Yes, we can!

 ...

 We'd better get some work done!

Please stop me before I do something like this again. -- Todd Coram


Exercise for the reader: write code so the above is an executable Tcl script... Trivial initial solution:

 foreach i {
    CAN Can Tcl Yes, Time Building Watching Scripting Working (Yeah!) All ... We'd
 } {
    proc $i args {}
 } ;# RS

... but don't try to execute CAN, this will throw an error, because the title doesn't conform to Tcl's syntax (extra character after close-quote). How about this trivial solution (leaving the title alone):

 proc unknown {args} {puts $args}