Yes. I would use the perl Wx interface, it is a lot faster, and more "familiar". See Joukes article on http://perl.com/ on a good basic intro (my jaw dropped after I ran Jouke's examples, and I dropped Tk along with it).

 
___crazyinsomniac_______________________________________
Disclaimer: Don't blame. It came from inside the void
perl -e "$q=$_;map({chr unpack qq;H*;,$_}split(q;;,q*H*));print;$q/$q;"