Algorithm-HyperLogLog
view release on metacpan or search on metacpan
eg/sample.pl view on Meta::CPAN
use strict;
use warnings;
use utf8;
use Algorithm::HyperLogLog;
my $hll = Algorithm::HyperLogLog->new(10);
while(<>){
next if !defined $_;
$hll->add($_);
}
my $cardinality = $hll->estimate;
__END__
( run in 0.387 second using v1.01-cache-2.11-cpan-acebb50784d )