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.
Non-existent; I don't have TV
Non-existent; my TV doesn't have/need a remote
Under my control; I watch alone
Under the control of whoever shouts loudest
Under the control of whoever gets it first
One of many, and the TV has a mind of its own
Results (600 votes),