my %test1 = (
    2 => 0,
    3 => 0,
    5 => 1,
    6 => 1,
    9 => 0,
    1 => 0,
    7 => 0,
);

my %test2 = (
    1 => 0,
    4 => 0,
    7 => 1,
    8 => 0,
);