Select Code to Download

my @aap = qw( 0aap 0noot 1mies 2mies 0aap 0noot 1mies 6mies );
foreach (@aap) {
...
                print "$test: $1\n";
        }
}

my @aap = qw( 0aap 0noot 1mies 2mies 0aap 0noot 1mies 6mies );
foreach (@aap) {
...
                }
        }
}