🚀 go-pugleaf

Rafal Walecki wrote:
[...]
> Z zboiru binarnego chce odtworzyc nazwe grupy (lancuch znakowy). Dlugosc
> tego lancucha zapisana jest w poprzednim bajcie. Niestety nie potrafie
> przeczytac tego bajtu.
> Ponizej fragment kodu w ktorym usilowalem przeczytac ten lancuch:
[...]
> read(DGNF, $tlen, 2);
[...]
> Wyglada to tak jakby perl nie chcial czytac niczego spoza zakresu
> dajacego sie interpretowac jako znaki.
> Moze ktos wie jak czytac i interpretowac takie cyfry z pliku binarnego?
> A co z formatem zmiennoprzecinkowym zapisanym na kilku bajtach?

ord() bedzie chyba tym czego szukasz.

Jezeli czytasz dwa bajty to rozumiem, ze jest to mlodszy/starszy bajt 
czyli zamiast:

read(DGNF, $tlen, 2);

moze tak:

$tlen = ord( getc( DGNF )) + 256 * ord( getc( DGNF ));

-- 
Krzysztof Murkowski
mailto:murek@ml.put.poznan.pl
http://www.ml.put.poznan.pl/~murek