Select Code to Download

my @AoA = (
    ['a','b','c'],
...
    ['a','b','d'],
    ['a','b','d'],
);

my @uAoA = (
    ['a','b','c'],
    ['a','b','d'],
);

use strict;
use warnings;
...

print Dumper \@uAoA;