Например, так:
$i/=2;
$f=sprintf("%3.0f",$i);
if($i == $f){print "чётное\\n";}
else{print "повезёт в следующий раз!\\n";
Вроде должно сработать только не в коем случае не заменяй "==" на "eq". Дело в том что при округлении (вторая строчка число 3 будет округлено до 003, и естественно в строковом контексте это "3" не равно "003", зато 3=003.
ЗЫ. пример сам не тестировал, но работать вроде должен.