perl中的缓冲区操作

Question

我正在使用perl recv调用通过网络接收数据包。我能够接收数据包，但数据包的格式是这样的：数据包的前两个字节传递有关其余消息的信息。我在perl中没有很多编程经验，我坚持认为如何将接收数据包的前两个字节复制到不同的变量中。

Answer 1

你想unpack：

my ($byte1, $byte2) = unpack('(a1)2', $packet);