use Set::Light;

my $set = Set::Light->new();
my $how_many = 10_000_000;
for( my $i = 0; $i < $how_many; $i++ ) {
    $set->insert( $i );
}
__END__
mem usage: 1127960