Discussion :

[yodaragorn]

Bonjour,

j'ai un script qui contient un passage d'argument et qui fonctionnait sur mon pc précédent.

après recopie des données et nouveau link du bin du Perl.exe, ce script ne récupère plus les valeurs des arguments passés !

avant toute chose, j'ai testé d'autres scripts qui fonctionnent parfaitement (mais qui n'ont pas de passage d'argument).

En fait, même un bête script de 3 lignes ne récupère plus les arguments passés.

Auriez-vous une piste, svp, car là je sèche ?

Voici un extrait de mon code :

Code :

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

1
2
3
4
5
6
7
8
9
 
#!C:\Users\A454222\Documents\_Apps\Perl64\bin\ -s
 
use strict;
use warnings;
 
our($TestArg) ;
 
print ("TestArg = { $TestArg }") ;

et le retour :

C:\Users\A454222\Documents\__Dev Perl\__TestScript>TestScirpt.pl -TestArg=3
Use of uninitialized value $TestArg in concatenation (.) or string at C:\Users\A454222\Documents\__Dev Perl\__TestScript\TestScirpt.pl line 11.
TestArg = { }

[hurukan]

Salutations...

Je n'ai pas l'impression dans ce que tu montres que tu récupères les paramètres...

Code :

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

my $parametres=@ARGV;

Pour récupérer le nombre de paramètres...

Code :

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

1
2
3
4
for($cpt=0;$cpt<$parametres;$cpt++)
{
  print "Param: ".$ARGV[$cpt]."\n";
}

...pour les afficher.

[yodaragorn]

Bonjour Hurukan,

merci de ta réponse.

normalement, la ligne

Code :

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

our $TestArg

doit récupérer l'argument passé en -TestArg, non ?

lorsque l'on utilise

Code :

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

use strict

avec le "-s", il faut prohiber l'utilisation de "my" et préférer "our" ... d'après ce que j'avais lu à l'époque.

[CosmoKnacki]

Normalement ça devrait marcher, est ce que tu es sûr de tester/éditer le bon script:

... __TestScript\TestScirpt.pl ...

[CosmoKnacki]

Code :

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

#!C:\Users\A454222\Documents\_Apps\Perl64\bin\ -s

Ou alors c'est le fait qu'il n'y ait pas le nom de l'exécutable (perl.exe) dans le path de ton shebang qui fait que ton option -s tombe dans le néant (j'imagine que sous Windows, l'extension .pl doit suffir à associer ton script à l'exécutable perl, ce qui fait qu'il s'exécute malgré tout.).

[yodaragorn]

Oui, j'avais vu l'inversion des lettres mais ce n'est pas ça le problème.

Et concernant la ligne shebang, je n'ai jamais mis le Perl.exe et mon script fonctionnait sur mon autre PC.

Par acquis de conscience, j'ai modifié en mettant bien TestScript et en ajoutant Perl.exe mais cela ne change rien au résultat.