Help for this page

Select Code to Download

Select or download this

sub bin2dec {
    return unpack("N", pack("B32", substr("0" x 32 . shift, -32)));
}

Select or download this

# Given a lsb-first bitstring, returns
# a 2s complement signed integer 
...
    return $result;
}