I was searching for desing patterns in Tcl

tcl is a dynamic language and provides other possibilities like Java and so on.

here is my script how the strategy pattern can be used with TclOO
 
----



----

<<categories>>TclOO
<<categories>>Strategy Pattern