Discussion :

[gracouille]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
@tab=[              14516,
                    78376,
                    83987,#
                    83987,#
                    76387,
                    930982,
                    83987#
                   ]

Dans ce tableau qui est un exemple, il ya certains elements de mm valeur.
83987 est présent trois fois dans ce tableau, je voudrais donc supprimer deux de ses occurences ce qui donnerait un resultat com cela:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
@tab=[              14516,
                    78376,
                    83987, #Cet element est desormais present qu'une fois
                    76387,
                    930982,
                   ]

Je pensais passer par l'intermediaire d'un autre tableau, mais je bloque!!!
Merci de votre aide.
[/code]

[dmitry_ovsianko]

Voilà:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
my @sans_doublons, %cache = ();
 
foreach my $i (@tab) {
	next if $cache {$i};
	push @sans_doublons, $i;
	$cache {$i} = 1;
}

[gracouille]

Merci bien ca marche direct !!!!

[fsapet]

salut

j'ai vu ca dans le cookbook perl
solution en 1 ligne , la plus rapide :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
my @sans_doublons;
my %cache = ();
@sans_doublons = grep { !  $cache{$_} ++ } @tab;

[gracouille]

exact ca marche bien,
Oh c tres bo tout ca en 1 seule ligne en plus, merci bien.