http://qs321.pair.com?node_id=736687


⭐ in reply to How do I convert a very long bit string into a number?

Combine unpack with Math::BigInt: 
use Math::BigInt;
use bigint;
use strict;
use warnings;

sub convert_bitstring_to_number
{
  my $bitstring = shift;
  my $h = unpack( 'H*', $bitstring );
  my $bh = new Math::BigInt '0x'.$h;
  $bh->as_int;
}

[download]

In Section Seekers of Perl Wisdom