my @keys = (1..10572);
my %hash;
@hash{@keys} = undef;

print "Size of keys: ".keys %hash,"\n";
print "Bucket details: ".%hash."\n";

keys %hash = 20000;
print "Bucket details: ".%hash."\n";

##</code><code>##

Size of keys: 10572
Bucket details: 7718/16384
Bucket details: 8943/32768