if (4 == index $strTest, 'p', 4) {