Discussion :

[beware]

bonjour,

je débute en perl, et je voulais savoir s'il état possible de faire ceci:

J'ai une subroutine nommé : regles($$@)
A la fin de mon script, j'aimerais faire plusieurs appels à cette fonction avec des variables diffèrentes tel que $var1, $var2, $var3 ou encore @tab1, @tab2, @tab3.

Donc est-il possible de faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
for ( $i = 1; $i <= 3; $i++ )
{
   regles ( $i, $var.$i, @tab.$i )
}

Merci

[Schmorgluck]

Version courte : non.

Version longue : tu devrais utiliser des tableaux à la place.

[Philou67430]

Version "ne pas suivre ce conseil" : c'est possible mais pas avec cette syntaxe (et c'est interdit avec use strict)
Version "suivre ce conseil" : choisir la réponse longue de Schmorgluck

[beware]

D'abord merci de vos réponses.

J'ai donc utilisé des tableaux. Mais je bloque sur ce point désormais.

J'ai crée mon tableau :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
my @tableau;

et j'utilise comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
$tableau[0][0] = $var1;
$tableau[0][1] = $var2;
$tableau[0][2] = [@tab1];

Je me trompais au début en oubliant les [ ] autour de l'affectation de @tab1.
Mais j'ai un problème si je veut afficher le tableau:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
print "$tableau[0][0] -  $tableau[0][1] - $tableau[0][2] ";

J'obtiens :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
4 -  6 - ARRAY(0x2164cd0)

Si j'ai bien tout lu freud, en réalité j'obtiens l'adresse de mon tableau mais pas son contenu ?

[Philou67430]

Ton élément $tableau[0][2] contient un tableau dont les éléments sont ceux de @tab1.

Pour accéder aux éléments de $tableau[0][2], il faut écrire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

print $tableau[0][2][0], $tableau[0][2][1];

Mais je suppose que ce n'est pas ainsi que tu souhaitais organiser ton tableau.

En fait, en perl, il n'existe que trois types de données :
- les scalaires
- les tableaux de scalaires (et uniquement de scalaires)
- les tables de hachage dont la clé et la valeur sont des scalaires

Pour "émuler" des tableaux à plusieurs dimensions, perl utilise des scalaires représentant des références de tableaux, qu'il place dans des tableaux.

Exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
@tableau = ([1, 2], [10, 20], [100, 200]);
print "$tableau[0][1] $tableau[2][0]\n"; #ecrit 2 100

Personnellement, pour bien identifier le fait qu'il ne s'agit pas de tableau à plusieurs dimension, je préfère utiliser la notation de déréférencement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
@tableau = ([1, 2], [10, 20], [100, 200]);
print "$tableau[0]->[1] $tableau[2]->[0]\n"; #ecrit 2 100

On peut aussi imaginer que les tableaux imbriqués n'aient pas tous la même longueur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
@tableau = ([1, 2, 3], [10, 20, 30, 40], [100, 200]);
print "$tableau[0][1] $tableau[2][0]\n"; #ecrit 2 100

Pour plus d'infos :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

perldoc perlvar

[beware]

Merci pour ton explication.

Après quelque tâtonnement, je suis arrivé à ce que je voulais.
J'utilise un for pour envoyer à ma routine, une ligne complète de mon tableau.