URL: https://www.opennet.me/cgi-bin/openforum/vsluhboard.cgi
Форум: vsluhforumID9
Нить номер: 5040
[ Назад ]

Исходное сообщение
"про pack и unpack "

Отправлено Наталья , 13-Янв-06 10:18 
есть строка из 8-ми символов всегда

my $m_string='00000a00';

ее нужно записать как 4 байта, как это сделать?

print pack("H*", $m_string) - выдает 5 байтов


Содержание

Сообщения в этом обсуждении
"про pack и unpack "
Отправлено ACCA , 13-Янв-06 12:49 
>print pack("H*", $m_string) - выдает 5 байтов

assa$ perl -e 'print pack("H*", "00000a00");' | od -x

0000000 0000 000a
0000004

assa$ perl -v

This is perl, v5.8.7 built for i486-linux-gnu-thread-multi


попробуй print pack("H*", "12345678"); - есть маза, что твой pack или print добивает какой-нибудь \0 или \n, а под DOS может и \x1b...


"про pack и unpack "
Отправлено Наталья , 13-Янв-06 12:55 
аха, именно так

оказывается все было намного проще, это я попыталась вывести в винде, и всего лишь навсего надо было выводить binmode ом :)