my %seen
@AoD = grep !$seen{$_}++, @AoD;