Never been to DZone Snippets before?

Snippets is a public source code repository. Easily build up your personal collection of code snippets, categorize them with tags / keywords, and share them with the world

Efficient 'uniq' snippet (See related posts)

This snippet will quickly uniq an unsorted array; in other words, remove duplicates. (note: for large arrays, it may be more efficient to sort the array first and simply keep track of consecutive dups instead of using a hash.)

  # Input: @list
  # Output: @uniqed
  my %u = ();
  @uniqed = grep {defined} map {
      if (exists $u{$_}) { undef; } else { $u{$_}=undef;$_; }
    } @list;
  undef %u;


to perl uniq duplicates by jmason on Tue Apr 12 23:26:57 -0400 2005

You need to create an account or log in to post comments to this site.


Click here to browse all 4861 code snippets

Related Posts