# generate test hashes from dataset
# adjust forloops for hash size & overlap
my $hash1 = {};
my $hash2 = {};
{
    require "testhash.dat";
    my $hash = $hashdata::VAR1;

    for ((keys %$hash)[1..10000]){
        $hash1->{$_} = $hash->{$_};
    }

    for ((keys %$hash)[9901..10100]){
        $hash2->{$_} = $hash->{$_};
    }
}