pack/unpack使えばそんな変なことにはならんぞ。
perlでバイナリ扱うなら常識。