Thread array nicht doppelt (5 answers)
Opened by Strazke at 2005-09-19 02:25

betterworld
 2005-09-19 03:24
#58166 #58166
User since
2003-08-21
2614 Artikel
ModeratorIn

user image
Rate ich richtig, dass Du versuchst, doppelte Elemente aus einem Array zu entfernen? Wie waere es hiermit:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
use strict;
use warnings;

my @array = qw(eins zwei drei vier eins fuenf zwei);
my %vorkommen;
@array = grep {
# Kam der schon vor?
if (exists $vorkommen{$_}) {
0; # dann wollen wir ihn nicht
} else {
# Merken, dass er vorkam
$vorkommen{$_} = 1;
1; # und wir nehmen ihn mit
}
} @array;
print "@array";

View full thread array nicht doppelt