pack('NN', $_<0 ? -1 : 0, $_);  # Signed
pack('NN', 0, $_);              # Unsigned