make lsearch case insensitive

darton · Post by **darton** » Thu Aug 10, 2006 10:27 am

Hello!
If I use the command "lsearch" to look for the word "test" in a textfile, there is a difference between test and Test. But I want that they are equal. Unfortunately the function -nocase is only available from TCL 8.5. As I am using a windrop, compiling is not that easy. So is there another possibility to make the lsearch command case insensitive?

Post by **nml375** » Thu Aug 10, 2006 10:35 am

You could always do the ugly hack; making sure list is always lowercase (string tolower if your friend here).
It's not a pretty solution, but it usually does the trick...

rosc2112 · Post by **rosc2112** » Thu Aug 10, 2006 7:41 pm

lsearch has a -regexp option, and regexp has options for case-insensitive matching, so perhaps play around with that a bit..

DragnLord · Post by **DragnLord** » Fri Aug 11, 2006 12:14 am

Have you tried using the following?

Code: Select all

lsearch -exact -nocase { list } pattern

demond · Post by **demond** » Fri Aug 11, 2006 4:24 am

[lsearch] has -nocase switch in Tcl 8.5 only

DragnLord · Post by **DragnLord** » Fri Aug 11, 2006 9:35 am

you may have to settle with converting to all lowercase before searching

Code: Select all

set list [string tolower $variable]
lsearch $variable text

darton · Post by **darton** » Fri Aug 11, 2006 10:57 am

Yes nml375 alread said that. It's a little bit circumstantial but it works.