Hi Monks!

I need to get rid of the duplicates coming from an array, as a sample here is some data:

 $VAR1 = {
           'ID' => '11',
           'Name' => 'Mary',
           'CC' => 'X5667'
         };
 $VAR2 = {
           'ID' => '10',
           'Name' => 'Joe',
           'CC' => 'X456'
         };
 $VAR3 = {
           'ID' => 'X2',
           'Name' => 'Carl',
           'CC' => 'P45'

         };
 $VAR4 = {
           'ID' => '12',
           'Name' => 'Jim',
           'CC' => 'PK1'
          ;
 $VAR5 = {
           'ID' => '11',
           'Name' => 'Mary',
           'CC' => 'X5667'
         };
[download]

Is there a better or correct way of doing this?

#!/usr/bin/perl


use strict;
use warnings;

use Data::Dumper;


 foreach my $st ( @{ $stuff } ) {


   next if $st->{ID};
   next if $st->{Name};
   next if $st->{CC};

   print $st->{ID} - $st->{Name} - $st->{CC};
   
 }
[download]

Thanks for looking!