in reply to Perl tk text -nocase

Solved. It works perfectly fine. I had some problems in the rest of the script. Okay. Time for a break.