use List::MoreUtils qw/uniq/;

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

my @uAoA = uniq(@AoA);

print Dumper \@uAoA;