http://www.perlmonks.org?node_id=910911


in reply to Perl sorting unique values

You could examine $f2 with List::Uniq.
#!/usr/bin/perl use strict; use warnings; use List::Uniq qw(:all); use Data::Dumper::Concise; my $f2 = [ qw|a c d b e d a|]; my $uniq = uniq( {sort => 1}, $f2 ); print Dumper($uniq);