将Perl函数转换为PHP函数(解包,打包)


convert perl function to php function (unpack, pack)

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

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

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

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

但我认为这个实现也做了同样的事情:

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