Discussion :

[frs75]

Bonjour,

J'ai un script perl qui doit prendre 2 parametres :
1/ un nom de fichier : mot
2/ un chemin windows : chaine de caractères pouvant contenir des espaces et des slashs ("C:\Documents and Settings\frs\Mes documents").

J'ai essayé plusieurs solutions (getoptions/@ARGV[0] et @ARGV[1]/parcours de tous les parametres) mais je n'arrive jamais à recuperer correctement mes 2 parametres (enfin surtout le 2eme!).

j'ai l'impression que l'interpreteur a du mal avec la combinaison espace + backslash...

j'ai essayé avec une ligne de commande de type :
mon_script.pl toto.c C:\Documents and Settings\frs\titi.ada
mon_script.pl -name toto.c -path C:\Documents and Settings\frs\titi.ada
mon_script.pl -name toto.c -path "C:\Documents and Settings\frs\titi.ada"
mon_script.pl toto.c "C:\Documents and Settings\frs\titi.ada"

Si vous avez deja eu ce besoin, comment vous en etes vous sortis ? :-)
Merci d'avance,
Franck

[djibril]

La manière la plus propre pour manipuler les arguments est d'utiliser le module Getopt::Long. J'en parle dans les sources de perl avec quelques exemples en se basant sur ta problématique.

[Philou67430]

Le problème des espaces dans les chemins, c'est qu'ils séparent le path en plusieurs paramètres d'appel.
As-tu essayé d'appeler ton programme ainsi:
mon_script.pl toto.c C:\Documents\ and\ Settings\frs\titi.ada
mon_script.pl -name toto.c -path C:\Documents\ and\ Settings\frs\titi.ada
mon_script.pl -name toto.c -path "C:\Documents\ and\ Settings\frs\titi.ada"
mon_script.pl toto.c "C:\Documents\ and\ Settings\frs\titi.ada"

Depuis qu'il type de console tapes-tu ces commandes ?

Cela dit, à priori, l'usage de " " (double quote) autour des chemins devrait fonctionner à la fois sous Cygwin/bash et sous l'invité de commande XP (activeperl).

Code cygwin/bash :

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

1
2
3
$ perl -e 'print map "[$_]\n", @ARGV' c:\toto.txt "c:\Document and Settings\moi\toto.txt"
[c:toto.txt]
[c:\Document and Settings\moi\toto.txt]

Code invité XP/activeperl :

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

1
2
3
4
 
C:\Perl>bin\perl.exe -e "print map qq([$_]\n), @ARGV;" c:\toto.txt "c:\Document and Settings\moi\toto.txt"
[c:\toto.txt]
[c:\Document and Settings\moi\toto.txt]