Discussion :

[meloo]

Bonjour,
J'aimerais passer la valeur d'une variable en parametre d'une fonction, par exemple

Code :

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

1
2
3
4
5
6
7
8
9
 
open(LOGXSL,$logxsl);
while (<LOGXSL>) 
{ 
     my $txt=$_; 
     $txt =~ s/file/$logfile/; 
     WLOG(eval($txt)) 
}
close(LOGXSL);

Sachant que :

Code :

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

$_="MES001,file,erreur"

et que WLOG attend 3 paramètres (les 3 contenus dans la variable $_)

Pouvez vous m'aider ?
J'ai essayé avec eval(...) mais cela ne fonctionne pas...


Merci d'avance

[Jasmine80]

J'aimerais passer la valeur d'une variable en parametre d'une fonction

Regarde sur la FAQ, tout y très bien expliqué
http://perl.developpez.com/faq/?page...B5#sectionB514

Tu peux passer $_ en unique paramètre puis faire un split(/,/) dessus afin de récupérer 3 variables indépendantes.

[meloo]

Regarde sur la FAQ, tout y très bien expliqué
http://perl.developpez.com/faq/?page...B5#sectionB514

Tu peux passer $_ en unique paramètre puis faire un split(/,/) dessus afin de récupérer 3 variables indépendantes.

Merci Jasmine pour ta réponse.
Mais utiliser le split reviendrait à toucher à ma fonction WLOG... Or je ne peux pas.


EDIT : Han quelle cruche !! :S faut le faire avant !! Bref, quand on est borné, on a du mal à bien comprendre les choses merci jasmine

[Jasmine80]

Mais utiliser le split reviendrait à toucher à ma fonction WLOG... Or je ne peux pas.

Aucun problème, dans ce cas fais le split avant la fonction afin de créer 3 variables à lui passer.

[meloo]

Bon je ne veux pas spammer...

Mais en fait ça ne peut pas marcher...
J'ai oublié de donner une information en voulant simplifier

Ma fonction WLOG peut avoir au minimum 3 variables +1 tableau en paramètres.

Le problème est que je ne connais pas sa taille (du tableau), je ne pourrais donc pas faire :

Code :

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

1
2
3
4
5
6
 
while (<LOGXSL>) 
{ 
     my @txt=split(/,/,$_); 
     WLOG($txt[0],$fileout,$txt[2],$txt[3])...... 
}

C'est pour ca que j'avais pas trouvé dans la faq

[Jasmine80]

Primo, il est très facile de connaître la taille d'un tableau

Code :

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

my $taille = @tableau

Secundo, cela n'est pas nécessaire. Tu peux passer le tableau en paramètre ou sa référence (préférable pour un tableau volumineux).

Code :

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

1
2
     WLOG(@txt);
     WLOG(\@txt); #ref

[meloo]

Merci Jasmine !!!