in reply to making my suroutine and parts of my program case insensitive.
Change your first regex to /$_/ig. Note the i-modifier (which tells it to match case insensitively). Another option is to uc() or lc() all input data and then compare.
Unixish Shell Scripting languages
Other (post in comments)
Results (494 votes). Check out past polls.