простой вопрос к знатокам Perl

Что бороть то? Есть функция ord - выдаёт числовой код символа. Как я понимаю, длина строки определяется не \0 терминатором, поэтому проблем нет.

Т.е. можно написать

for ($i = 0; $i < length($str); ++$i) { print ord(substr($str, $i, 1)), "\n"; } И всё должно быть нормально.

И read должен читать не \0 а \0\0\0\0 в этом случае.

Нет... не совсем так, то есть совсем наоборот,read читает просто числа, а при выводе и при сравнении они выводятся как "голые" ASCII коды.

в pack/unpack твое счастье

тебе, кстати, anonymous правильно сказал. его код решает твою проблему.

+1
и это и первый ответ анонимуса нужно комбинировать.

Спасибо всем, разобрался, но как-то все равно ощущение что через одно место... :)