Help for this page

Select Code to Download


  1. or download this
    my %seen;
    my @unique = grep !$seen{$_}++, map "$_", @objects;
    
  2. or download this
    my %seen;
    my @unique = map !$seen{$_}++ ? "$_" : (), @objects;