Почему оператор модуля ведет себя по-разному в Perl и PHP?

У меня есть функция PHP, которая не работает с отрицательными числами:

function isOdd($num) 
{
   return $num % 2 == 1; 
}

, но работает с положительными числами.

У меня есть подпрограмма Perl, которая делает то же самое и работает и с отрицательными числами.

sub isOdd()
{
  my ($num) = @_;
  return $num % 2 == 1;
}

Сделал ли я ошибку при переводе функции? или это ошибка PHP?