$mCrc = $mPolyTable[ ( $mCrc ^ $iByteArray[$x] ) & 0xFF ]; #### unpack('C', substr(pack('J', $val), 0, 1)) #### unpack('C', substr(pack('J', $val), -1, 1)) #### unpack('C', substr(pack('J<', $val), 0, 1)) #### unpack('C', pack('J<', $val))