I know that I could use pack/unpack, but I would like to know what I am doing wrong in this case, since there is a very similiar example in "Programming Perl" (pg. 666) that claims to work as described.

tigervamp