我需要这个Perl字符串的Python模拟:
unpack("nNccH*", string_val)
我需要Python格式字符的nNccH*
- 数据格式。
在Perl中,它将二进制数据解包为五个变量:
但我不能用Python做到这一点
更多:
bstring = ''
while DataByte = client[0].recv(1):
bstring += DataByte
print len(bstring)
if len(bstring):
a, b, c, d, e = unpack("nNccH*", bstring)
我从未在Perl或Python中写过,但我目前的任务是编写一个用Perl编写的多线程Python服务器......
答案 0 :(得分:7)
Perl格式"nNcc"
等同于Python格式"!HLbb"
。
在Perl的"H*"
中没有Python的直接等价物。
有两个问题。
struct.unpack
不接受通配符*
struct.unpack
没有“hexlify”数据字符串使用像unpack
这样的帮助函数可以解决第一个问题。
第二个问题可以使用binascii.hexlify
来解决:
import struct
import binascii
def unpack(fmt, data):
"""
Return struct.unpack(fmt, data) with the optional single * in fmt replaced with
the appropriate number, given the length of data.
"""
# http://stackoverflow.com/a/7867892/190597
try:
return struct.unpack(fmt, data)
except struct.error:
flen = struct.calcsize(fmt.replace('*', ''))
alen = len(data)
idx = fmt.find('*')
before_char = fmt[idx-1]
n = (alen-flen)//struct.calcsize(before_char)+1
fmt = ''.join((fmt[:idx-1], str(n), before_char, fmt[idx+1:]))
return struct.unpack(fmt, data)
data = open('data').read()
x = list(unpack("!HLbbs*", data))
# x[-1].encode('hex') works in Python 2, but not in Python 3
x[-1] = binascii.hexlify(x[-1])
print(x)
对此Perl脚本生成的数据进行测试时:
$line = pack("nNccH*", 1, 2, 10, 4, '1fba');
print "$line";
Python脚本产生
[1, 2, 10, 4, '1fba']
答案 1 :(得分:6)
您正在寻找的等效Python函数是struct.unpack
。格式字符串的文档位于:http://docs.python.org/library/struct.html
如果你真的解释了你需要什么样的拆包,你将有更好的机会获得帮助。不是每个人都知道Perl。