in reply to Tk-CanvasDirTree

Very nice, zentara++.

It has both a clean appearance and a comfortable "feel" to it as well.  And the default image is hilarious!

s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/

In Section Cool Uses for Perl