my @array = $arrays->{$array_name};

for my $number (@array) {
    $result->{$number}->{$array_name} = 1
}