%test_hash = (); for (@array) { if (exists ($test_hash{$_->[10]})) {next} print @{$_}; $test_hash{$_->[10]} = 1; }