1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42

DESS TIMH

Introduction au langage Perl

  1. tableaux indicés

IMAGE imgs/introperl18.gif

  • values(tabi)Toutes les valeurs d'un tableau indicé (sous la forme d'un tableau)
    print 'les prix:', join(', ', values(%prix));
  • keys(tabi)

Toutes les "clés" d'un tableau indicé
print 'les fruits:', join(', ', keys(%prix));

  • exists(élément)Indique si un élément a été défini
    if (exists $prix{'kiwi'}) {
    print $prix{'kiwi'};
    } else {
    print 'Je ne connais pas le prix du kiwi !';
    }
  • delete(élément)Supprimer un élément
    delete $prix{'cerise'};


Remarque:
Il n'existe pas de fonction permettant d'ajouter un élément dans un tableau indicé (comme le push
des tableaux normaux) car il suffit d'écrire :
$tab{nouvel-élément} = nouvelle-valeur;

http://www.med.univ-rennes1.fr/~poulique/cours/perl/

Page 16

[CONVERTED BY MYRMIDON]