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