php - 为什么取模运算符在 Perl 和 PHP 中的行为不同？

Question

我有这个不适用于负数的 PHP 函数:

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

但它适用于正数。

我有这个 Perl 例程，它做完全相同的事情并且也适用于负数

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

我在翻译这个函数时犯了什么错误吗？还是 PHP 错误？

Answer 1

在 PHP 中，x % y 结果的符号是 dividend 的符号，它是 x 但
在 Perl 中，它是 除数 的符号，即 y。

因此在 PHP 中，$num % 2 的结果可以是 1、-1 或 0.

因此修复你的函数，将结果与 0 进行比较:

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