$i+=2;print"$i$s ")for($j=1;1+$i/2>$j+=2;)p($j)+p($k=$i-$j)||$s.=" $j+$k";