将 perl 函数转换为 php 函数（解包，打包）[关闭]

Question

我想将数字的二进制表示转换为 PHP 中的数字。我目前在 Perl 中使用以下内容：

sub binary2decimal {
    return unpack("N", pack("B32", substr("0" x 32 . shift, -32)));
}

例如，binary2decimal('1101') 返回13，binary2decimal('1110') 返回14。

Answer 1

可能你需要这个函数：http://php.net/bindec

但我认为这个实现也是一样的：

function binary2decimal($param) {
  return unpack("N", pack("B32",substr(str_repeat("0",32) . $param, -32)));
}