substr($word, 3, 2) = "AB";