while ($x % $p[$i] !=0)
__________^