Re^2: remove duplicate value in array


more useful options
	PerlMonks

Re^2: remove duplicate value in array

by Anonymous Monk

on Jul 03, 2015 at 11:54 UTC ( [id://1133080]=note: print w/replies, xml )

Need Help??

in reply to Re: remove duplicate value in array
in thread remove duplicate value in array

@content = qw(1 2 3 1 2 4 2 5 4 3);
print "arr  @content\n";

for ($i=0; $i<=$#content; $i++)
{
        my $count = 0;

        for ($j=$i+1; $j<$#content+1; $j++)
       {


        if ($content[$i] == $content[$j])
                {
                           $count++;


                   }



        if ($content[$i] == $content[$j] && $count == 1)
         {

 $content[$j] = "";
         }
   }

 }
  print "@content";
[download]

Code tags added by GrandFather