IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Langage Perl Discussion :

Tester existence valeur dans ARRAY


Sujet :

Langage Perl

  1. #1
    Membre du Club Avatar de Matmal11
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    111
    Détails du profil
    Informations personnelles :
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juillet 2006
    Messages : 111
    Points : 50
    Points
    50
    Par défaut Tester existence valeur dans ARRAY
    Bonjour,

    J'ai un tableau et une variable que j'initialise comme ca:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    my $val1 = 1;
    my $val2 = 2;
    my @array = ( $val1, $val2 );
     
    my $value = 3;
    Je voudrais tester si la valeur de $value est présente dans le tableau.
    Savez s'il existe un test sur les valeurs dans le tableau, ou s'il faut que je passe par un hash et utiliser les KEYS???

    Merci d'avance
    Mat

  2. #2
    Expert éminent
    Avatar de Jedai
    Homme Profil pro
    Enseignant
    Inscrit en
    Avril 2003
    Messages
    6 245
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Côte d'Or (Bourgogne)

    Informations professionnelles :
    Activité : Enseignant

    Informations forums :
    Inscription : Avril 2003
    Messages : 6 245
    Points : 8 586
    Points
    8 586
    Par défaut
    Passer par un hash est plus efficace si tu as souvent de telles vérifications à faire, surtout si ton tableau est très gros. D'ailleurs si tu ne te soucie pas de l'ordre dans lequel sont rangées tes valeurs, tu devrais utiliser un hash plutôt qu'un tableau.

    Néanmoins s'il s'agit d'une vérification ponctuelle, tu peux te contenter d'utiliser grep et de vérifier si le tableau résultant est vide :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    my $val1 = 1;
    my $val2 = 2;
    my @array = ( $val1, $val2 );
     
    my $value = 3;
     
    print "$value is in \@array\n" if grep {$_ == $value} @array;
    Ou mieux : la fonction List::Util::first() (List::Utils est dans le CORE)
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    use List::Util qw(first);
     
    print "$value is in \@array\n" if defined (first {$_ == $value} @array);
    --
    Jedaï

  3. #3
    Membre du Club Avatar de Matmal11
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    111
    Détails du profil
    Informations personnelles :
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juillet 2006
    Messages : 111
    Points : 50
    Points
    50
    Par défaut
    Merci, ta première solution marche à merveille, j'adopte...

Discussions similaires

  1. [XL-2007] tester existence valeur dans colonne
    Par tallent_e dans le forum Macros et VBA Excel
    Réponses: 6
    Dernier message: 26/11/2011, 16h44
  2. [Intraweb] Tester existance image dans TIWImageFile
    Par Maglight dans le forum Débuter
    Réponses: 0
    Dernier message: 19/04/2009, 00h49
  3. Comment mettre aucune valeur dans Array of integer?
    Par Ardely dans le forum Langage
    Réponses: 10
    Dernier message: 02/08/2007, 19h15
  4. Réponses: 1
    Dernier message: 24/05/2007, 15h53
  5. [vb excel]Tester une valeur dans une ligne
    Par Mugette dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 28/09/2005, 14h58

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo