@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