Powered by Ajaxy
Digg StumbleUpon LinkedIn YouTube Flickr Facebook Twitter RSS Reset

Perl: Créer un slice à deux dimensions

for ($startx = $x = 4; $x <= 8; $x++) {
    for ($starty = $y = 7; $y <= 12; $y++) {
        $mySlice[$x - $startx][$y - $starty] = $AoA[$

Additionner deux tableaux avec l’opérateur ‘+’

#!/usr/bin/perl -w
 
use strict;
 
#définition de deux tableaux @tab1 et @tab2
my @tab1 = ("janvier",

Le tableau peut contenir des éléments indefinis

# Définition d'un tableau de 4 éléments avec deux éléments définis
# et deux autres indéfinis
 
my @

Copier un tableau dans un autre

#!/usr/bin/perl -w
 
 
my @tab1 = (1, 2, 3, 4);       #Définition d'un tableau de 4 éléments
my @tab2;

Perl: itération simultanée de deux tableaux

# définition de deux tableaux
@tab_a = ( -1, 52, .5, 3.5 );
@tab_b = ( 0, 10, -5, 1 );
 
foreach $el

Itérer un tableau à l’aide d’un boucle

#!/usr/bin/perl
 
@tab = (1, 2, 3, 4, 5);
 
foreach $elem (@tab)
{
    $elem--;   #Soustraire 1 dans c

Perl: Exemple de définition d’un tableau

#!/usr/bin/perl -w
 
use strict;
 
my @tab;                            #déclaration d'un tableau
 
# In

Définition et assignation d’une liste

# définition d'une liste de mot avec le mot clé 'qw'
@tab = qw( janvier février mars avril mai juin

Exemple de tableau comme valeur de retour d’une fonction

# Retourner un tableau comme valeur de retour
# de la fonction 'tab_valeurs'
sub tab_valeurs
{

Tableau: Exemple d’interpolation

#!/usr/bin/perl
 
@lang = qw(Perl Python Java);
$indice = 1;
 
$text = "J'aime $lang[0]";
print "$text