манипулирование буфером в perl

Question

Я получаю пакет по сети, используя вызов perl recv.Я могу получить пакет, но пакет отформатирован таким образом, что первые два байта пакета передают информацию об остальной части сообщения.У меня нет большого опыта программирования на Perl, и я застрял в том, как мне скопировать первые два байта из полученного пакета в другую переменную.

Answer 1

Вы хотите unpack:

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