Discussion :

[vince2005]

Bonjour,

J'ai une application qui génére des variables.

A travers fichier bat, j'arrive à récuperer la variable toto

par la commande

Code :

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

1
2
 
echo %toto% >> log.txt

Par contre en perl, j'aimerai récupérer ces memes variables, mais sans succés.

Merci pour votre aide

[Jedai]

J'ai l'impression que tu parles de variable d'environnement ?
Dans ce cas elles sont accessibles en Perl par l'intermédiaire du hash %ENV, par exemple :

Code :

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

print $ENV{toto};

--
Jedaï

[vince2005]

En fait, j'ai une application, qui lance un fichier bat, dans lequel je fais :

Code :

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

1
2
3
 
echo %x_appli% >> log.txt
echo %_trans% >> log.txt

Mon fichier log.txt vient se générer avec les bonnes variables.

En revanche mon application permet aussi de lancer un script perl, mais via mon script perl, je n'arrive pas à recupere ces variables.

$ENV{user_name} permet de récuperer les variables charger dans l'environnement de windows, equivaut la commande Set sous windows.
Mais pour mon cas, ce n'est pas une variable windows.

merci de m'aider si vous avez une piste

[MarneusCalgarXP]

Est-ce que ce ne seraient pas des variables définies dans ton .bat ? Si c'est le cas, il te suffit de les passer en paramètre à ton script Perl...

[Jedai]

%x_appli% est la variable windows x_appli...

--
Jedaï

[vince2005]

dans mon fichier bat,

supposons que je saisisse echo %appli% >> log.txt

dans mon fichier log.txt, je me retrouve avec la valeur de ma variable, donc celle ci est bien chagé en amont.

par contre, si je fais la meme chose en perl directement, je n'obtiens rien.

par contre si dans mon fichier bat, j'appelle mon perl avec des arguments en paramétres, cela fonctionne.(voir ci-dessous)

Code :

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

1
2
3
 
@echo off
C:\DIVERS\script1.pl %x_appli%

et mon script perl :

Code :

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

1
2
3
 
my $NomFicCsv=$ARGV[0];
print $NomFicCsv ;

dans ce cas, je récupére bien ma valeur, mais je suis obligé de passer par un fichier bat.

[Jedai]

Tu n'as pas l'air de comprendre que Perl a accès aux variables de son environnement... Si tu lances un script Perl dans l'environnement où %appli% a une valeur, tu y as accès par $ENV{appli}, si ça ne te donne rien, c'est qu'un script .bat au même endroit ne donnerait rien non plus.
Si tu nous disais d'où vient la valeur de %appli% et ce que tu essaies de faire, on pourrait peut-être te dire où tu as fait erreur.

--
Jedaï