my %tmp = map { $_ => 1} @foo;
my @uniq_foo = sort keys %tmp;