Help for this page

Select Code to Download

Select or download this

#!/usr/bin/env perl -l

...
my %unique = map { $_ => 1 } @$selected;

print "@$_" for grep { ! map { $_ ? $_ : () } @unique{@$_} } @AoA;

Select or download this
```
2 13 3 16
17 6 18 12
```