undef $h{ 0+ int rand 2**32 } for 1 .. 2e6;;
print scalar keys %h;;
1999519

print total_size \%h;;
67353411