Bonjour,
j'ai un probleme au niveau des parmetres d'une fonction qui cherche si un element est present dans une liste (je suis débutante alors c'est possible qui m'échapé une petite erreur)
voici le code
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
 
sub est_present {
my $element =$_[0];
my @lst = @_[1];
print("la liste $lst[0] \n");
for $val (@lst)
{
  if ($element eq $val)
  { print(" element $element et la valeur $val\n");
    $in = 1;
    last;
  }
}
return $in;
}
$resultat=&est_present("a",$liste);
mais au niveau du resultat rien pourtant "a" appartient à @liste (c'est le premier élement )
merci pour tout coup de main pour ce probleme