Le langage Perl le tableau associatif

Le tableau associatif est une structure de données dans laquelle chaque indice est identiﬁé par un nom (on parle de clef). • La variable de type hash est préﬁxée par le caractère ’%’. • les éléments à inclure sont entre parenthèses. +++ • Elle pourra contenir des chaînes de caractères, des numériques ou des adresses mémoire. • l’accès à un élément du hash se fait en préﬁxant le hash avec le caractère “$”.
%codon2AA = ( TTT => F, TTC => F, TTA => L, TTG => L );
print $codon2AA{’TTT’},$codon2AA{’TTA’},$codon2AA{’TTG’};

Variables Les tableaux associatifs (hash).
• On pourra aussi générer un hash vide et créer des clefs à la volé. • Les valeurs associées aux clefs peuvent être incrémentées via les opérateurs classiques d’incrémentation et de décrémentation. • On pourra avoir accès aux noms des clefs avec la fonction keys.
%countAA = (); $countAA{’Gly’} = 10; $countAA{’Ala’}++; $countAA{’Gly’}–; @AA = keys(%countAA); print $AA[0], » « , $countAA{$AA[0]}, » « , $AA[1], » « , $countAA{$AA[1]};
Variables Tableaux à deux dimensions
• On pourra créer des tableaux à 2 dimensions avec la syntaxe suivante:
@matrice = ([0,2,3],[4,5,6],[6,7,8]); print $matrice[0][2], « \n »;

Variables Les références
• Une référence, en Perl, peut être considérée comme le pointeur du langage C.
• C’est une variable qui contient une adresse mémoire.
• On peut créer un référence à un variable existante en utilisant l’opérateur ’\.’
#Référence vers un scalaire $GeneSymbol = ’Bcl2’; $pGeneSymbol = \$GeneSymbol; print « La variable GeneSymbol contient « , $GeneSymbol, « \n »; print « La variable pGeneSymbol contient « , $pGeneSymbol, « \n »;
#Référence vers un tableau @Domain = (’BH1’,’BH2’,’BH3’); $pDomain = \@Domain; print « La variable Domain contient « , @Domain, « \n »; print « La variable pDomain contient « , $pDomain, « \n »;
#Référence vers un hash %Motif = (AAATTCCT => 2,AATTGGC => 3, AATTGC => 4); $pMotif = \%Motif; print « La variable Motif contient « , %Motif, « \n »; print « La variable pMotif contient « , $pMotif, « \n »;
La variable GeneSymbol contient Bcl2 La variable pGeneSymbol contient SCALAR(0x817b994) La variable Domain contient BH1BH2BH3 La variable pDomain contient ARRAY(0x817ba0c) La variable Motif contient AATTGC4AATTGGC3AAATTCCT2 La variable pMotif contient HASH(0x817bde4