substr($_, 3, 2) = 'foo';