Help for this page
#!/usr/bin/env perl -l ... my %unique = map { $_ => 1 } @$selected; print "@$_" for grep { ! map { $_ ? $_ : () } @unique{@$_} } @AoA;
2 13 3 16 17 6 18 12