Discussion :

[ngouagme]

Slut,
j'ai une fonction InRdvDtata qui me dit que je n'ai pas initialisé $df[0] (on le constate en faisant un print comme fait ci-dessous. Cependant, la variable analogue $dd[0] marche bien! on dirait que le premier tableau en paramètre masque le second. Quelqu'un pourrait il m'aider à faire fonctionner ce bout de code?
je veux récupérer avec les deux dernières instruction la date sous la forme 8-13-2015 et 15-13-2015.

Merci d'avance!

Code :

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

1
2
3
4
5
6
7
8
sub InRdvData {
    my ($mytxt, @dd, @df, $lieu) = @_;
    # Insert here the implementation
	print ("mon text= $mytxt\t toto= $df[0]\t titi= $dd[1]\n");
	my $d=$dd[0]."-".$dd[1]."-".$dd[2];
	my $f=$df[0]."-".$df[1]."-".$df[2];
}
InRdvData("bidule", (8, 13, 2015), (15, 13, 2015), "Bureau");

[djibril]

Si tu souhaites récupérer des tableaux dans tes procédures, tu dois passer des références de tableau et non le tableau.
Dans ton code suivant :

Code :

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

1
2
3
4
5
6
7
8
sub InRdvData {
    my ($mytxt, @dd, @df, $lieu) = @_;
    # Insert here the implementation
	print ("mon text= $mytxt\t toto= $df[0]\t titi= $dd[1]\n");
	my $d=$dd[0]."-".$dd[1]."-".$dd[2];
	my $f=$df[0]."-".$df[1]."-".$df[2];
}
InRdvData("bidule", (8, 13, 2015), (15, 13, 2015), "Bureau");

$mytxt contiendra "bidule" et @dd contiendra (8, 13, 2015), (15, 13, 2015), "Bureau" d'où ton message comme quoi @df et $lieu non initialisées.

[Philou67430]

J'ai donné une explication détaillée ici...

[ngouagme]

Salut,

j'ai tenu compte de la remarque que tu as faite sur la récupération de tableau dans une procédure et j'ai modifié mon code comme ci-dessous, mais ça ne marche toujours pas. Pour en savoir plus, je me suis rendu sur le pointeur que tu as indiqué (référence), mais je ne suis pas sorti de l'auberge!!
merci de me dire encore plus là dessus.

Code :

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

1
2
3
4
5
6
7
8
9
10
sub InRdvData {
     my ($mytxt,@dd,@df,$lieu) = @_;
	 my $ref_dd = \@dd;
	 my $ref_df = \@df;
    # Insert here the implementation
		print ("mon text= $mytxt\t  tata =$date[1][0]\t monlieu= $lieu\n");
		my $d=$$ref_dd[0]."-".$$ref_dd[1]."-".$$ref_dd[2]; print ("cette var vaut: $d\n");
		my $f=$$ref_df[0]."-".$$ref_df[1]."-".$$ref_df[2]; print ("cette var vaut: $f\n");
}
InRdvData("bidule", [8, 13, 2015], [15, 13, 2015],"Bureau");

[ngouagme]

Y'a t-il une différence entre (8, 13, 2015) et [8, 13, 2015] dans Perl?
si oui, laquelle? ou bien est ce deux notations qui renvoient à la même chose?

Merci

[ngouagme]

Merci djibril, philou m'a envoyé une solution détaillée sur la question et d'une pédagogie extravagante.

Pour clôturer cette nouvelle discussion, je réitère ma question sur la question précédente en demandant s'il y a une différence entre (8, 13, 2015) et [8, 13, 2015] dans Perl?

je le demande parce que quand je tente de changer [8, 13, 2015] en (8, 13, 2015) dans mon code perl, la solution avec les tableaux qui marchaient très bien avec [8, 13, 2015] ne marchent pas avec (8, 13, 2015).

est ce la même syntaxe pour déclarer un tableau et que c'est juste une question de version perl supporté ou est ce deux choses différentes?

merci.

[Philou67430]

Pour clôturer cette nouvelle discussion, je réitère ma question sur la question précédente en demandant s'il y a une différence entre (8, 13, 2015) et [8, 13, 2015] dans Perl?

je le demande parce que quand je tente de changer [8, 13, 2015] en (8, 13, 2015) dans mon code perl, la solution avec les tableaux qui marchaient très bien avec [8, 13, 2015] ne marchent pas avec (8, 13, 2015).

est ce la même syntaxe pour déclarer un tableau et que c'est juste une question de version perl supporté ou est ce deux choses différentes?

Non, les deux notations correspondent à deux objets bien distincts :

• (8, 13, 2015) représente une liste ou un tableau. Si tu souhaites le ranger dans une variable, elle doit être de type tableau, donc commençant par le sigil @ (comme @df, @dd).
• [8, 13, 2015] représente une référence à un tableau anonyme (c'est à dire non rattaché à une variable). Cette référence est de type scalaire (une unique donnée), et doit être enregistrée dans une variable scalaire ($df, ou $dd). Pour accéder aux éléments du tableau anonyme, il faut alors déréférencer le scalaire.

Différentes manières de déréférencer une référence à un tableau :

Code :

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

1
2
3
@dd = @$dd;
$dd_annee = $dd->[2];
$dd_jour = ${$dd}[1];

[ngouagme]

Merci Philou,
ta remarque m'a permise de bien comprendre la doc sur le référencement et le déférencement.

[Philou67430]

C'est d'autant mieux que les références, en perl, sont indispensable pour manipuler des structures de données complexes