Программа для поиска совершенных чисел

for($p=1; $p++{ 
$is_simple=true; 
for($i=1; $i<=$p; $i++){ 
if($i!=1 and $i!=$p){ 
if(($p % $i)==0) $is_simple=false; 
} 
} 
if($is_simple==true){ 
$a=pow(2,$p)-1; 
for($i=2; $i<=$a; $i++){ 
if($i!=$a){ 
if($a%$i==0) $is_simple=false; 
} 
} 
if($is_simple==true){ 
$b=pow(2,$p-1)*$a; 
echo $b. "\n"; 
} 
} 
if($p==31) break; 
}

Где то есть ошибка