It works for me if you pass decoded text strings to Tk.

So for example if you use UTF-8 for your program source code, also add use utf8; on top.

See this article, Encode, perluniintro and perlunifaq for more information on that topic.