Help for this page

Select Code to Download

Select or download this

my $aant = (keys %HoHoA);
for (my $i = 1; $i<= $aant; $i++) {
...
        }
    }
}

Select or download this

key1_set1 - key1_set2
key1_set1 - key2_set2
...
key2_set3 - key2_set4
key2_set3 - key3_set4