Help for this page

Select Code to Download

Select or download this

sub uniq (@) {
    my %h;
    map { $h{$_}++ == 0 ? $_ : () } @_;
}