$b = index(lc($mystr),"a");