Select Code to Download

my @a1 = qw(1 2 5 9 11 12 13);
my @a2 = qw(1 2 5 11 12 13);
...
        sort {$a <=> $b} keys %seen;
    };
}

9 11