Re^3: Create unique array --the hard way!

in reply to Re^2: Create unique array --the hard way!
in thread Create unique array --the hard way!

Great that you found a solution yourself

Since you didn't follow your own idea of using sorting to identify doubles the sort step is now useless.

To follow your original plan you would have to do something like this:


my $previous="";
foreach my $element ( @sorted_array_q3 )
{
  if ( $element ne $previous )
  {
     push( @unique_array, $element );
  }
  $previous= $element;
}
[download]

Comment on Re^3: Create unique array --the hard way! Download Code

In Section Seekers of Perl Wisdom