substr(substr($p, 0, 1) = '123', 0, 1) = 'x';
substr((substr($q, 0, 1)) = '123', 0, 1) = 'x';