author | heiko |
Tue, 22 Jan 2002 20:36:00 +0100 | |
changeset 16 | 6b2a0de29990 |
parent 15 | b9baa645576a |
child 17 | b51d4c6816e7 |
--- a/me8100_test_int/test.pl Tue Jan 22 20:30:44 2002 +0100 +++ b/me8100_test_int/test.pl Tue Jan 22 20:36:00 2002 +0100 @@ -11,7 +11,7 @@ sysread(DEV, $val, 2); $val = unpack("s", $val); print "Hi, got a signal, read $val\n"; - print "<", unpack("b16", pack("N", $val)), ">\n"; + print "<", unpack("B16", pack("n", $val)), ">\n"; }; open(DEV, $DEV)