Array - Unique Values (Push) 1

[Extension]

I want to populate an array but I want to only "push" unique values.

@array = (213,215,213,215,245,120);

foreach my $Numbers (@array) {

	if ($Numbers > 200) {
		push(@NewNumbers,$Number);
	}
}

With the example above, the "215" is getting pushed twice while I simply want to unique ones.

Thank you

 

[KevinADC]

http://perldoc.perl.org/perlfaq4.html#How-can-I-remove-duplicate-elements-from-a-list-or-array?

my @array = (213,215,213,215,245,120);
my %seen = ();
@array = grep { ! $seen{ $_ }++ } @array;

- Kevin, perl coder unexceptional!