Das Forum

Code: Alles auswählen

my @array = ('test','test1','test');
@array = array_unique(@array);
print @array;
sub array_unique {
   my %all;
   $all{$_}=0 for @_;
   return (keys %all);
}