Help for this page

Select Code to Download

Select or download this

use List::MoreUtils qw/uniq/;

...
my @uAoA = uniq(@AoA);

print Dumper \@uAoA;

Select or download this

$VAR1 = [
          ['a','b','c],
          ['a','b','d']
        ];