#!/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);
[download]

PerlMonks lovingly hand-crafted by Tim Vroom.
PerlMonks somehow became entangled with The Perl Foundation.
Speedy Servers and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.