my @rand = ( map { int rand $range } 1 .. $ITERS )[0 .. $ITERS/2];
my @hits = ( shuffle keys %HASH )[0 .. $ITERS/2];
my @miss = ( grep { ! exists $HASH{$_} } 0 .. $range )[0 .. $ITERS/2];