Some time ago, I've written a little game because I wanted to play around a bit with Tk::Canvas. If you are interested in the code, goto(http://www.fabiani.net/)->Tips&Tricks->Downloads->Download von Käsekästchen

Another help might be the widget(.bat) in the perl/bin-Path which contains a lot of Tk-examples. Although they are coded more in a way a Tcl programmer would write code, I've learned a lot by having a look at the code...

Best regards,
perl -e "s>>*F>e=>y)\*martinF)stronat)=>print,print v8.8.8.32.11.32"