>>844
どうもです。いろいろ試して、

$l1 = int($x/0xffffffff);
$l2 = $x % 0xffffffff;
print pack 'LL', $l2, $l1;

これで、求めるものが出ているような気もしますが
あんまり自信もなし。。。

Q は、 perldoc -f pack すると

q A signed quad (64-bit) value.
Q An unsigned quad value.
(Quads are available only if your system supports 64-bit integer values _and_ if Perl has been compiled to support those. Causes a fatal error otherwise.)

とあって、これしかねぇ〜と喜んだのですが。。。
Win32ではサポート外だったようで。ﾊｧ