$ perl -e"print unpack('q',pack('H*', 'ffffffffffffffff'))"
-1