1. Tableaux, listes

    En Perl, les tableaux peuvent être utilisés comme des ensembles ou des listes.
    Toujours précédés du caractère « @ »
    @chiffres = (1,2,3,4,5,6,7,8,9,0);
    @fruits = ('amande','fraise','cerise');
    @alphabet = ('a'..'z');    Les deux points signifient de "tant à tant"
    @a = ('a'); @nul = ();
    @cartes = ('01'..'10','Valet','Dame','Roi');

    on fait référence à un élément du tableau selon son indice par :
    $chiffres[1](=> 2)
    $fruits[0] (=> 'amande')
    REMARQUE : En Perl (comme en C) les tableaux commencent à l'indice 0

    On peut affecter un tableau à un autre tableau :
    @ch = @chiffres;

    Remarques :
    On dispose d'un scalaire spécial :     $#tableau qui indique le dernier indice du tableau (et donc sa
    taille - 1) :     $fruits[$#fruits] (=> 'cerise')

    Tableaux associatifs

    Ils sont toujours précédés du caractère % :
    %frequence = ('AAA'=>0.01, 'AAG'=>0.08, 'AAC'=>0.02);

    En Perl 4 la notation est :
    %frequence = ('AAA',0.01, 'AAG',0.08, 'AAC',0.02);

    On référence ensuite un élément du tableau par : $frequence{'AAA'}
    (ou  $frequence{AAA})

    Exemples:
    %chiffre = ();
    $chiffre{'un'} = 1;
    print $chiffre{un};
    $var = 'un'; print $chiffre{$var};

  2. Tableaux à plusieurs dimensions

    On peut utiliser les tableaux indicés pour simuler des tableaux à 2 (ou n) dimensions :
    %table_multiplication = ('1,1'=>1, '1,2'=>2, ...,
    '9,8'=>72,'9,9'=>81);

    $traduction{'amande','anglais'} = 'almond';
    $traduction{'amande','italien'} = 'amoria';
    $traduction{'cerise','anglais'} = 'cherry';

    On peut également utiliser les tableaux de tableaux de Perl 5 pour le faire :
    @table_multiplication = (
    [ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0],# Multiplié par 0
    [ 0, 1, 2, 3, 4, 5, 6, 7, 8, 9],# Multiplié par 1
    [ 0, 2, 4, 6, 8,10,12,14,16,18],# Multiplié par 2
    ...
    [ 0, 9,18,27,36,45,54,63,72,81]);# Multiplié par 9

    On référencera alors 2*6 par $table_mult[6] [2]