in reply to New to Perl TK

works for me. ran it on ActiveState perl 5.8
the hardest line to type correctly is: stty erase ^H

In Section Seekers of Perl Wisdom