my (@items, @unique, %seen);

for (@items)
{
    push @unique, $_ unless $seen{$_}++;
}
[download]

This has a few benefits:

• Deterministic ordering.
• Works for objects and passes them through to @unique without stringification.