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.