Discussion :

[Pauli]

Bonjour,

Je cherche un moyen de trouver un chiffre dabs un stack:
voici un example:

push($num,@a);
.
.
.
.
.
if (grep($num,@a){...};

Je vois dans mon stack la bonne valeur mais le grep ne recherche pas le chiffre mais le char.

Est ce que qelqu'un pourrait m'aider?

Merci.

[Jedai]

Code :

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

1
2
3
if( grep {$_ == $num} @stack ) {
 
}

Mais si @stack est vraiment gros, tu devrais considérer d'autres possibilités, comme par exemple entretenir un hash en parallèle de façon à avoir une vérification en O(1).

--
Jedaï

[Pauli]

Merci bcp,

Mais pour ce qui est du hash aussi il faudrait faire une loop pour trouver ma valeur donc ce sera aussi long ?

[Jedai]

Mais pour ce qui est du hash aussi il faudrait faire une loop pour trouver ma valeur donc ce sera aussi long ?

Non bien sûr... L'avantage du hash c'est que si tu as une clé dans le hash, tu peux tester son existence avec une complexité constante en moyenne, tu passes de O(n) à O(1) !
Par exemple :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
my @a;
my %a;
 
foreach (1..4000) {
    my $num = rand 2_000_000;
    push @a, $num;
    $a{$num} = 1;
}
 
#...
 
my $num = something;
 
if ( exists $a{$num} ){
    #...
}

--
Jedaï