switch -nocase doesn't work on tcl v8.4
fix: add strin tolower function
Bug watches keep track of this bug in other bug trackers.