in reply to word size

There's also this: 

$bits = length(unpack("B*",pack("J")));

[download]

In Section Cool Uses for Perl